--- loncom/interface/courseprefs.pm	2025/03/15 01:03:33	1.134
+++ loncom/interface/courseprefs.pm	2025/05/13 04:07:07	1.135
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set configuration settings for a course
 #
-# $Id: courseprefs.pm,v 1.134 2025/03/15 01:03:33 raeburn Exp $
+# $Id: courseprefs.pm,v 1.135 2025/05/13 04:07:07 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1941,8 +1941,8 @@ sub get_credentials {
                         my $privkey = $privhash{'key'};
                         $privnum = $privhash{'version'};
                         if (($privnum) && ($privkey ne '')) {
-                            $cipher = Crypt::CBC->new({'key'     => $privkey,
-                                                       'cipher'  => 'DES'});
+                            $cipher = Crypt::CBC->new(-pass   => $privkey,
+                                                      -cipher => 'Crypt::DES');
                         }
                     }
                 }