--- loncom/interface/domainprefs.pm	2024/08/31 18:48:53	1.443
+++ loncom/interface/domainprefs.pm	2024/10/11 23:29:34	1.444
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set domain-wide configuration settings
 #
-# $Id: domainprefs.pm,v 1.443 2024/08/31 18:48:53 raeburn Exp $
+# $Id: domainprefs.pm,v 1.444 2024/10/11 23:29:34 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -13732,7 +13732,11 @@ sub modify_colors {
             @bgs = ('pgbg','tabbg','sidebg');
         }
         my %defaults = &role_defaults($role,\@bgs,\@links,\@images,\@logintext);
-        unless ($env{'form.'.$role.'_font'} eq $defaults{'font'}) {
+        $env{'form.'.$role.'_font'} = lc($env{'form.'.$role.'_font'});
+        if ($env{'form.'.$role.'_font'} =~ /^\w+/) {
+            $env{'form.'.$role.'_font'} = '#'.$env{'form.'.$role.'_font'};
+        }
+        unless ($env{'form.'.$role.'_font'} eq lc($defaults{'font'})) {
             $confhash->{$role}{'font'} = $env{'form.'.$role.'_font'};
         }
         if ($role eq 'login') {