Index: openacs-4/packages/photo-album/www/photos-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/photo-album/www/photos-add-2.tcl,v
diff -u -r1.3.2.1 -r1.3.2.2
--- openacs-4/packages/photo-album/www/photos-add-2.tcl	3 Dec 2003 22:52:33 -0000	1.3.2.1
+++ openacs-4/packages/photo-album/www/photos-add-2.tcl	4 Jan 2004 13:52:19 -0000	1.3.2.2
@@ -8,7 +8,7 @@
     @creation-date 6/28/2002
     @cvs_id $Id$
 } {
-    upload_file:trim,optional
+    {upload_file:optional,trim ""}
     upload_file.tmpfile:optional,tmpfile
     album_id:integer,notnull
 } -validate {
@@ -23,7 +23,7 @@
 	}
     }
     directory_exists {
-        if {([info exists $upload_file] && ![empty_string_p $upload_file]) && ![file isdirectory [parameter::get -parameter FullTempPhotoDir -package_id [ad_conn package_id]]]} { 
+        if {([info exists upload_file] && ![empty_string_p $upload_file]) && ![file isdirectory [parameter::get -parameter FullTempPhotoDir -package_id [ad_conn package_id]]]} { 
             ad_complain "The directory file does not exist"
         }
     }