--- loncom/interface/spreadsheet/lonspreadsheet.pm	2003/12/08 19:59:09	1.31
+++ loncom/interface/spreadsheet/lonspreadsheet.pm	2004/02/24 21:03:09	1.31.2.1
@@ -1,5 +1,5 @@
 #
-# $Id: lonspreadsheet.pm,v 1.31 2003/12/08 19:59:09 matthew Exp $
+# $Id: lonspreadsheet.pm,v 1.31.2.1 2004/02/24 21:03:09 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -256,10 +256,12 @@ sub handler {
     $symb = $ENV{'form.usymb'} if (exists($ENV{'form.usymb'}));
     my $name   = $ENV{'user.name'};
     my $domain = $ENV{'user.domain'};
-    if (exists($ENV{'form.sname'})) {
+    if (exists($ENV{'form.sname'}) && $ENV{'form.sname'} ne '') {
         $name   = $ENV{'form.sname'};
         $domain = $ENV{'form.sdomain'};
     }
+    $ENV{'form.sname'} = $name;
+    $ENV{'form.sdomain'} = $domain;
     ##
     ## Check permissions
     my $allowed_to_edit = &Apache::lonnet::allowed('mgr',