Index: openacs-4/packages/xowiki/www/xinha/file-selector.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/xinha/file-selector.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/xowiki/www/xinha/file-selector.tcl	13 Sep 2012 16:07:08 -0000	1.15
+++ openacs-4/packages/xowiki/www/xinha/file-selector.tcl	27 Oct 2014 16:42:08 -0000	1.16
@@ -4,8 +4,8 @@
   @creation-date 13.10.2005
   @cvs-id $Id$
 } {     
-  {fs_package_id:integer,notnull,optional}
-  {folder_id:integer,optional}
+  {fs_package_id:naturalnum,notnull,optional}
+  {folder_id:naturalnum,optional}
   {orderby:optional}
   {selector_type "image"}
   {file_types "*"}
@@ -247,7 +247,7 @@
       }
     }
 
-set order_by_clause [expr {[exists_and_not_null orderby] ?
+set order_by_clause [expr {([info exists orderby] && $orderby ne "") ?
                            [template::list::orderby_clause -orderby -name contents] :
                            " order by fs_objects.sort_key, fs_objects.name asc"}]