Changeset 11786
- Timestamp:
- 2006-05-09T14:58:16+12:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/bin/script/downloadinfo.pl
r11782 r11786 3 3 ########################################################################### 4 4 # 5 # downloadinfo.pl -- 5 # downloadinfo.pl -- prints out information about a download module 6 6 # A component of the Greenstone digital library software 7 7 # from the New Zealand Digital Library Project at the 8 8 # University of Waikato, New Zealand. 9 9 # 10 # Copyright (C) 1999New Zealand Digital Library Project10 # Copyright (C) 2006 New Zealand Digital Library Project 11 11 # 12 12 # This program is free software; you can redistribute it and/or modify … … 26 26 ########################################################################### 27 27 28 # This program will print info about a Download29 28 30 29 use strict; … … 41 40 use download; 42 41 use util; 43 #use parsargv;44 42 use gsprintf; 45 43 use printusage; … … 48 46 my $arguments = 49 47 [ { 'name' => "collect", 50 'desc' => "{ pluginfo.collect}",48 'desc' => "{downloadinfo.collect}", 51 49 'type' => "string", 52 50 'reqd' => "no" }, … … 54 52 'desc' => "{scripts.xml}", 55 53 'type' => "flag", 56 'reqd' => "no" 54 'reqd' => "no"}, 57 55 { 'name' => "listall", 58 56 'desc' => "{scripts.listall}", … … 69 67 70 68 my $options = { 'name' => "downloadinfo.pl", 71 'desc' => "{ pluginfo.desc}",69 'desc' => "{downloadinfo.desc}", 72 70 'args' => $arguments }; 73 71 … … 79 77 80 78 sub main { 81 my $self = {};82 my $blnParseFailed = "false";83 79 84 80 my $collect = ""; … … 214 210 } 215 211 else { 216 gsprintf(STDERR, "\n{downloadinfo.passing_options}\n\n");217 212 gsprintf(STDERR, "{downloadinfo.option_types}:\n\n"); 218 213 gsprintf(STDERR, "{downloadinfo.specific_options}\n\n"); 219 214 gsprintf(STDERR, "{downloadinfo.general_options}\n\n"); 220 gsprintf(STDERR, "$download { downloadinfo.info}:\n\n");215 gsprintf(STDERR, "$download {common.info}:\n\n"); 221 216 222 217 $downloadobj->print_txt_usage();
Note:
See TracChangeset
for help on using the changeset viewer.