Diff for /rat/lonwrapper.pm between versions 1.32 and 1.32.2.2

version 1.32, 2008/12/19 14:30:51 version 1.32.2.2, 2010/02/11 15:12:11
Line 145  sub handler { Line 145  sub handler {
 #  #
  if ($is_ext) {   if ($is_ext) {
     $ENV{'QUERY_STRING'}=~s/(^|\&)symb=[^\&]*/$1/;      $ENV{'QUERY_STRING'}=~s/(^|\&)symb=[^\&]*/$1/;
               $ENV{'QUERY_STRING'} =~ s/\&$//;
  }   }
  $url.=(($url=~/\?/)?'&':'?').$ENV{'QUERY_STRING'};           unless ($ENV{'QUERY_STRING'} eq '') {
               $url.=(($url=~/\?/)?'&':'?').$ENV{'QUERY_STRING'};
           }
  # reappend the query arguments   # reappend the query arguments
  $r->print(&wrapper($orgurl,$url));   $r->print(&wrapper($orgurl,$url));
     } # not just the menu      } # not just the menu

Removed from v.1.32  
changed lines
  Added in v.1.32.2.2


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>