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
--- openacs-4/packages/xowiki/www/xinha/insert-ilink.tcl	17 Aug 2006 01:44:27 -0000	1.4
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,21 +0,0 @@
-ad_page_contract {
-  @author Guenter Ernst guenter.ernst@wu-wien.ac.at, 
-  @author Gustaf Neumann neumann@wu-wien.ac.at
-  @creation-date 13.07.2004
-  @cvs-id $Id: insert-ilink.tcl,v 1.4 2006/08/17 01:44:27 gustafn Exp $
-} {
-  {fs_package_id:integer,optional}
-  {folder_id:integer,optional}
-  {file_types *}
-}
- 
-set selector_type "file"
-set file_selector_link [export_vars -base file-selector \
-                            {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