[LON-CAPA-cvs] cvs: loncom /interface groupsort.pm

[matthew]

matthew		Mon Jul 12 16:42:32 2004 EDT

  Modified files:              
    /loncom/interface	groupsort.pm 
  Log:
  Bug 3195: "Go Back" button in groupsort didn't take lonindexer to the right 
  place.
  
  
Index: loncom/interface/groupsort.pm
diff -u loncom/interface/groupsort.pm:1.28 loncom/interface/groupsort.pm:1.29
--- loncom/interface/groupsort.pm:1.28	Tue May 18 10:26:34 2004
+++ loncom/interface/groupsort.pm	Mon Jul 12 16:42:31 2004
@@ -2,7 +2,7 @@
 # The LON-CAPA group sort handler
 # Allows for sorting prior to import into RAT.
 #
-# $Id: groupsort.pm,v 1.28 2004/05/18 14:26:34 albertel Exp $
+# $Id: groupsort.pm,v 1.29 2004/07/12 20:42:31 matthew Exp $
 # 
 # Copyright Michigan State University Board of Trustees
 #
@@ -319,9 +319,10 @@
 
         # --- Expand here if "GO BACK" button desired
         if ($ENV{'form.catalogmode'} eq 'groupimport') {
+            my $resurl = &Apache::loncommon::lastresurl();
 	    $r->print(<<END);
 <input type="button" name="alter" value="$lt{'gb'}"
- onClick="window.location='/res/?catalogmode=groupimport'" />&nbsp;
+ onClick="window.location='$resurl?catalogmode=groupimport'" />&nbsp;
 END
         }
 	if ($ENV{'form.catalogmode'} eq 'groupsearch') {