| |
1 |
|
ad_page_contract { |
| |
2 |
|
@author Guenter Ernst guenter.ernst@wu-wien.ac.at, |
| |
3 |
|
@author Gustaf Neumann neumann@wu-wien.ac.at |
| |
4 |
|
@creation-date 13.07.2004 |
| |
5 |
|
@cvs-id $Id$ |
| |
6 |
|
} { |
| |
7 |
|
{fs_package_id:integer,optional} |
| |
8 |
|
{folder_id:integer,optional} |
| |
9 |
|
} |
| |
10 |
|
|
| |
11 |
|
set selector_type "image" |
| |
12 |
|
set file_selector_link [export_vars -base file-selector \ |
| |
13 |
|
{fs_package_id folder_id selector_type}] |
| |
14 |
|
set fs_found 1 |
