diff --git a/src/Handler/Material.hs b/src/Handler/Material.hs
index 5f095626a..84d3a142c 100644
--- a/src/Handler/Material.hs
+++ b/src/Handler/Material.hs
@@ -159,7 +159,7 @@ getMaterialListR tid ssh csh = do
                        E.||. (E.maybe (E.val mempty) (E.castString.esqueletoMarkupOutput) (material E.^. MaterialDescription) `E.ilike` (E.%) E.++. E.val needle E.++. (E.%)))   
         ]
       , dbtFilterUI  = \mPrev -> mconcat $ catMaybes
-        [ Just  $ prismAForm (singletonFilter "searchName") mPrev $ aopt textField (fslI MsgFilterMaterialNameSearch)
+        [ Just  $ prismAForm (singletonFilter "name") mPrev $ aopt textField (fslI MsgFilterMaterialNameSearch)
         , Just  $ prismAForm (singletonFilter "searchTypeAndDescription") mPrev $ aopt (textField & addDatalist typeOptions) (fslI MsgFilterMaterialTypeAndDescriptionSearch)]
       , dbtCsvEncode  = noCsvEncode
       , dbtCsvDecode  = Nothing