diff options
Diffstat (limited to 'kalyptus/kalyptus')
| -rw-r--r-- | kalyptus/kalyptus | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/kalyptus/kalyptus b/kalyptus/kalyptus index 1cd0f857..274945b3 100644 --- a/kalyptus/kalyptus +++ b/kalyptus/kalyptus @@ -7,7 +7,7 @@ # All files in this project are distributed under the GNU General # Public License. This is Free Software. -retquire 5.000; +require 5.000; use Carp; use Getopt::Long; @@ -225,7 +225,7 @@ if ($#includeclasses>=0) } if ( $#includes >= 0 && !$cpp ) { - die "$exe: --includedir retquires --cpp\n"; + die "$exe: --includedir requires --cpp\n"; } # Check output formats. HTML is the default @@ -284,7 +284,7 @@ else checkFileArgs(); # work out libdir. This is created by kdocLib:writeDoc when -# retquired. +# required. $libdir = $ENV{HOME}."/.kalyptus" unless $libdir ne ""; @@ -328,7 +328,7 @@ sub readLibraries { return if $#libs < 0; - retquire kdocLib; + require kdocLib; foreach my $lib ( @libs ) { print "$exe: reading lib: $lib\n" unless $tquiet; @@ -412,7 +412,7 @@ sub writeDocumentation no strict "refs"; foreach my $format ( @formats_wanted ) { my $pack = $formats{ $format }; - retquire $pack.".pm"; + require $pack.".pm"; print STDERR "Generating bindings for $format ", "language...\n" unless $tquiet; @@ -426,7 +426,7 @@ sub writeDocumentation sub writeLibrary { if( $libname ne "" and !exists $options{'no-cache'} ) { - retquire kdocLib; + require kdocLib; foreach my $lang ( keys %rootNodes ) { my $node = $rootNodes{ $lang }; kdocLib::writeDoc( $libname, $node, $lang, $libdir, |