[env-switcher-cvs] CVS: env-switcher/src switcher.in,1.2,1.3

[Jeff S. <jsq...@us...>]

Update of /cvsroot/env-switcher/env-switcher/src
In directory usw-pr-cvs1:/tmp/cvs-serv15000

Modified Files:
	switcher.in 
Log Message:
Fix for env-switcher bug 556218 -- print a message reminding/telling
the user that attribute changes only take effect in *future* shells,
not the current environment.


Index: switcher.in
===================================================================
RCS file: /cvsroot/env-switcher/env-switcher/src/switcher.in,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** switcher.in	18 May 2002 21:49:03 -0000	1.2
--- switcher.in	18 May 2002 22:05:47 -0000	1.3
***************
*** 734,738 ****
      $contents->set($attr_name, $value);
  
!     # Upon success, silence is golden
  
      0;
--- 734,744 ----
      $contents->set($attr_name, $value);
  
!     # Unless silent, remind the user that this will take effect for
!     # all new shells.
! 
!     if (!switcher_silent) {
! 	print "Attribute successfully set; new attribute setting will be " .
! 	    "effective for\nfuture shells\n";
!     }
  
      0;
***************
*** 891,899 ****
  	if ($want_announce == 1 && 
  	    ($a =~ /true/i || $a eq "1")) {
  	    if (-f "$tag_dir/$tag/$d") {
! 		print "echo switcher: Loading $tag:$d;\n";
  	    } else {
! 		print "echo switcher: Unable to find modulefile for $tag:$d " .
! 		    "-- skipping;\n";
  	    }
  	}
--- 897,905 ----
  	if ($want_announce == 1 && 
  	    ($a =~ /true/i || $a eq "1")) {
+ 	    print "echo switcher:$tag: ";
  	    if (-f "$tag_dir/$tag/$d") {
! 		print "Loading $d;\n";
  	    } else {
! 		print "Cannot find modulefile for $d -- skipping;\n";
  	    }
  	}