--- loncom/publisher/lonpublisher.pm 2003/12/26 21:17:37 1.153 +++ loncom/publisher/lonpublisher.pm 2003/12/27 14:42:57 1.154 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Publication Handler # -# $Id: lonpublisher.pm,v 1.153 2003/12/26 21:17:37 www Exp $ +# $Id: lonpublisher.pm,v 1.154 2003/12/27 14:42:57 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -960,9 +960,6 @@ sub publish { $metadatafields{'author'}=~s/\s+/ /g; $metadatafields{'author'}=~s/\s+$//; $metadatafields{'owner'}=$cuname.'@'.$cudom; - $metadatafields{'modifyinguser'}=$ENV{'user.name'}.'@'. - $ENV{'user.domain'}; - $metadatafields{'authorspace'}=$cuname.'@'.$cudom; # ------------------------------------------------ Check out directory hierachy @@ -1345,6 +1342,9 @@ sub phasetwo { $metadatafields{'obsoletereplacement'}= $ENV{'form.obsoletereplacement'}; $metadatafields{'dependencies'}=$ENV{'form.dependencies'}; + $metadatafields{'modifyinguser'}=$ENV{'user.name'}.'@'. + $ENV{'user.domain'}; + $metadatafields{'authorspace'}=$cuname.'@'.$cudom; my $allkeywords=$ENV{'form.addkey'}; if (exists($ENV{'form.keywords'})) {