--- loncom/interface/Attic/lonspreadsheet.pm	2002/04/11 14:16:32	1.85
+++ loncom/interface/Attic/lonspreadsheet.pm	2002/04/18 20:21:38	1.87
@@ -1,5 +1,5 @@
 #
-# $Id: lonspreadsheet.pm,v 1.85 2002/04/11 14:16:32 matthew Exp $
+# $Id: lonspreadsheet.pm,v 1.87 2002/04/18 20:21:38 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -122,6 +122,8 @@ sub initsheet {
     $safeeval->permit("sort");
     $safeeval->deny(":base_io");
     $safehole->wrap(\&Apache::lonnet::EXT,$safeeval,'&EXT');
+    $safehole->wrap(\&send_msg,     $safeeval,"&send_msg");
+    $safehole->wrap(\&send_crit_msg,$safeeval,"&send_crit_msg");
     my $code=<<'ENDDEFS';
 # ---------------------------------------------------- Inside of the safe space
 
@@ -2419,8 +2421,8 @@ $tmpdir=$r->dir_config('lonDaemons').'/t
 
     function celledit(cn,cf) {
         var cnf=prompt(cn,cf);
-	if (cnf!=null) {
-	    document.sheet.unewfield.value=cn;
+        if (cnf!=null) {
+            document.sheet.unewfield.value=cn;
             document.sheet.unewformula.value=cnf;
             document.sheet.submit();
         }
@@ -2648,6 +2650,7 @@ ENDSCRIPT
        }
     }
     $r->print('>');
+
     if (&gettype($asheet) eq 'classcalc') {
        $r->print(
    ' Output CSV format: <input type=checkbox name=showcsv onClick="submit()"');