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

[matthew]

matthew		Mon Oct 25 09:04:58 2004 EDT

  Modified files:              
    /loncom/interface	portfolio.pm 
  Log:
  Fixed warning on startup (use of '=' in conditional).
  "=" should be "==" and in the case of string comparison "==" should be "eq" :)
  
  
Index: loncom/interface/portfolio.pm
diff -u loncom/interface/portfolio.pm:1.50 loncom/interface/portfolio.pm:1.51
--- loncom/interface/portfolio.pm:1.50	Tue Oct 19 15:13:04 2004
+++ loncom/interface/portfolio.pm	Mon Oct 25 09:04:58 2004
@@ -488,7 +488,7 @@
 	# need to know if directory is empty so it can be removed if desired
 	my $is_empty=(@dir_list == 2);
 	&display_common($r,$current_path,$is_empty,\@dir_list);
-	if ($ENV{"form.mode"}='selectfile'){
+	if ($ENV{"form.mode"} eq 'selectfile'){
 	    &select_files($r);
             &display_file_select($r,$current_path,$is_empty,\@dir_list);
 	} else {