fixed cyradm (unresolved symbol to db_create)

imapd/imapd.spec

@@ -61,12 +61,17 @@ Provides:     IMAP
 %prep
     %setup -q -n cyrus-imapd-%{version}
     %patch -p0
+    %{l_shtool} subst \
+        -e 's;db-4.1;db;g' \
+        configure
+    %{l_shtool} subst \
+        -e 's;^\( *.LIBS..*\)\(\"\],.*\)$;\1 -ldb\2;' \
+        perl/imap/Makefile.PL
     %{l_shtool} subst \
         -e 's;^\(.) exec\) \(perl .*\)$;\1 %{l_prefix}/bin/\2;' \
         perl/imap/cyradm.sh
 
 %build
-    %{l_shtool} subst -e 's;db-4.1;db;g' configure
     cflags="-I%{l_prefix}/include"
     ldflags="-L%{l_prefix}/lib"
     case "%{l_target}" in