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

[banghart]

banghart		Wed Jul 18 09:39:31 2007 EDT

  Modified files:              
    /loncom/interface	lonindexer.pm 
  Log:
  	Bug 5080: Warn user problem has changed after selecting from 
  	indexer.
  
  
Index: loncom/interface/lonindexer.pm
diff -u loncom/interface/lonindexer.pm:1.172 loncom/interface/lonindexer.pm:1.173
--- loncom/interface/lonindexer.pm:1.172	Wed Jul 11 19:51:19 2007
+++ loncom/interface/lonindexer.pm	Wed Jul 18 09:39:31 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Directory Indexer
 #
-# $Id: lonindexer.pm,v 1.172 2007/07/11 23:51:19 albertel Exp $
+# $Id: lonindexer.pm,v 1.173 2007/07/18 13:39:31 banghart Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -269,6 +269,9 @@
 function select_data(url) {
    var location = "/res/?launch=2&form=$form&element=$element&titleelement=$titleelement&acts=" + url;
    window.location=location;
+   if (window.opener.document.forms["$form"].elements["$element"].value != url) {
+       window.opener.unClean();
+   }
 }
 function select_group() {
     window.location="$location"+document.forms.fileattr.acts.value;