--- loncom/interface/loncommon.pm	2023/11/11 18:50:51	1.1416
+++ loncom/interface/loncommon.pm	2023/11/11 23:09:23	1.1417
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.1416 2023/11/11 18:50:51 raeburn Exp $
+# $Id: loncommon.pm,v 1.1417 2023/11/11 23:09:23 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -6469,7 +6469,10 @@ sub nocodemirror {
             $nocodem = 'yes';
         }
     }
-    return $nocodem;
+    if ($nocodem eq 'yes') {
+        return 1;
+    }
+    return;
 }
 
 ###############################################