--- loncom/interface/lonparmset.pm 2001/01/16 15:52:09 1.21
+++ loncom/interface/lonparmset.pm 2001/02/08 12:36:57 1.22
@@ -11,7 +11,7 @@
#
# 11/20,11/21,11/22,11/23,11/24,11/25,11/27,11/28,
# 12/08,12/12,
-# 16/01/01 Gerd Kortemeyer
+# 16/01/01,02/08 Gerd Kortemeyer
package Apache::lonparmset;
@@ -140,7 +140,7 @@ sub plink {
my ($type,$dis,$value,$marker,$return,$call)=@_;
return ''.
- &valout($value,$type).'';
+ &valout($value,$type).'';
}
# ================================================================ Main Handler
@@ -392,6 +392,7 @@ sub handler {
function psub() {
pclose();
if (document.parmform.pres_marker.value!='') {
+ document.parmform.action+='#'+document.parmform.pres_marker.value;
document.parmform.submit();
} else {
document.parmform.pres_value.value='';