Index: openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl,v diff -u -N -r1.6 -r1.7 --- openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl 13 Sep 2012 16:07:08 -0000 1.6 +++ openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl 27 Oct 2014 16:42:08 -0000 1.7 @@ -4,8 +4,8 @@ @creation-date 13.07.2004 @cvs-id $Id$ } { - {fs_package_id:integer,optional} - {folder_id:integer,optional} + {fs_package_id:naturalnum,optional} + {folder_id:naturalnum,optional} {file_types *} } @@ -14,8 +14,4 @@ {fs_package_id folder_id selector_type file_types}] set fs_found 1 -#set user_id [ad_verify_and_get_user_id] -#permission::require_permission -party_id $user_id -object_id $fs_package_id \ -# -privilege "admin" - ad_return_template