[LON-CAPA-cvs] cvs: loncom /interface lonparmset.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Fri, 23 May 2003 06:18:25 -0000
albertel Fri May 23 02:18:25 2003 EDT
Modified files:
/loncom/interface lonparmset.pm
Log:
- fixes BUG#1488, deseleting options in lonparmset works.
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.91 loncom/interface/lonparmset.pm:1.92
--- loncom/interface/lonparmset.pm:1.91 Wed May 7 15:31:43 2003
+++ loncom/interface/lonparmset.pm Fri May 23 02:18:25 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.91 2003/05/07 19:31:43 bowersj2 Exp $
+# $Id: lonparmset.pm,v 1.92 2003/05/23 06:18:25 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -687,12 +687,12 @@
my $url=$ENV{'form.url'};
$url=~s-^http://($ENV{'SERVER_NAME'}|$ENV{'HTTP_HOST'})--;
$pssymb=&Apache::lonnet::symbread($url);
- @pscat='all';
+ if (!@pscat) { @pscat=('all'); }
$pschp='';
$parmlev = 'full';
} elsif ($ENV{'form.symb'}) {
$pssymb=$ENV{'form.symb'};
- @pscat='all';
+ if (!@pscat) { @pscat=('all'); }
$pschp='';
$parmlev = 'full';
} else {