photo-album-search-procs.tcl