Changeset 10347
- Timestamp:
- 2005-07-28T17:01:38+12:00 (19 years ago)
- Location:
- trunk/gsdl/perllib
- Files:
-
- 11 edited
-
classify/BasClas.pm (modified) (1 diff)
-
plugins/BasPlug.pm (modified) (3 diffs)
-
plugins/DBPlug.pm (modified) (1 diff)
-
plugins/FavouritesPlug.pm (modified) (1 diff)
-
plugins/HTMLPlug.pm (modified) (1 diff)
-
plugins/LaTeXPlug.pm (modified) (1 diff)
-
plugins/MACROPlug.pm (modified) (1 diff)
-
plugins/MARCPlug.pm (modified) (1 diff)
-
plugins/MP3Plug.pm (modified) (1 diff)
-
plugins/SRCPlug.pm (modified) (1 diff)
-
plugins/W3ImgPlug.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/classify/BasClas.pm
r10253 r10347 53 53 # 28/11/03 Commented out verbosity argument - John Thompson 54 54 55 #use parsargv;56 55 use gsprintf; 57 56 use printusage; -
trunk/gsdl/perllib/plugins/BasPlug.pm
r10329 r10347 43 43 44 44 use Kea; 45 use parsargv;46 45 use multiread; 47 46 use encodings; … … 55 54 use gsprintf 'gsprintf'; 56 55 use printusage; 57 #$%^58 56 use parse2; 59 57 … … 690 688 691 689 if ($smart_block || $smart_block_BN) { 692 693 690 if (defined $self->{'file_blocks'}->{$filename} && $self->{'file_blocks'}->{$filename} == 1){ 694 691 $self->{'num_blocked'} ++; -
trunk/gsdl/perllib/plugins/DBPlug.pm
r10218 r10347 39 39 use BasPlug; 40 40 use unicode; 41 use parsargv;42 41 43 42 use DBI; # database independent stuff -
trunk/gsdl/perllib/plugins/FavouritesPlug.pm
r10254 r10347 31 31 32 32 use BasPlug; 33 use parsargv;34 33 use strict; 35 34 no strict 'refs'; # allow filehandles to be variables and viceversa -
trunk/gsdl/perllib/plugins/HTMLPlug.pm
r10277 r10347 40 40 use unicode; 41 41 use util; 42 use parsargv;43 42 use XMLParser; 44 43 -
trunk/gsdl/perllib/plugins/LaTeXPlug.pm
r10254 r10347 34 34 # greenstone packages 35 35 use BasPlug; 36 use parsargv;37 36 use unicode; 38 37 use util; -
trunk/gsdl/perllib/plugins/MACROPlug.pm
r10254 r10347 27 27 28 28 use BasPlug; 29 use parsargv;30 29 31 30 use strict; -
trunk/gsdl/perllib/plugins/MARCPlug.pm
r10254 r10347 31 31 use unicode; 32 32 use util; 33 use parsargv;34 33 35 34 use strict; -
trunk/gsdl/perllib/plugins/MP3Plug.pm
r10254 r10347 29 29 30 30 use UnknownPlug; 31 use parsargv;32 31 33 32 use strict; -
trunk/gsdl/perllib/plugins/SRCPlug.pm
r10254 r10347 40 40 41 41 use BasPlug; 42 use parsargv;43 42 44 43 use strict; -
trunk/gsdl/perllib/plugins/W3ImgPlug.pm
r10254 r10347 116 116 use unicode; 117 117 use util; 118 use parsargv;119 118 use strict; # 'subs'; 120 119 no strict 'refs'; # allow filehandles to be variables and viceversa
Note:
See TracChangeset
for help on using the changeset viewer.
