--- loncom/interface/loncommon.pm 2008/12/23 19:27:12 1.692.2.9 +++ loncom/interface/loncommon.pm 2009/01/08 19:51:28 1.692.2.11 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.692.2.9 2008/12/23 19:27:12 raeburn Exp $ +# $Id: loncommon.pm,v 1.692.2.11 2009/01/08 19:51:28 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4634,7 +4634,7 @@ table#LC_mainmenu td.LC_mainmenu_column .LC_menubuttons_link { text-decoration: none; } -#2008--9-5: new menu style sheet.Changed category +/*2008--9-5: new menu style sheet.Changed category*/ .LC_menubuttons_category { color: $font; background: $pgbg; @@ -9596,11 +9596,13 @@ sub get_annotation { } sub clean_symb { - my ($symb) = @_; + my ($symb,$delete_enc) = @_; &Apache::lonenc::check_decrypt(\$symb); my $enc = $env{'request.enc'}; - delete($env{'request.enc'}); + if ($delete_enc) { + delete($env{'request.enc'}); + } return ($symb,$enc); }