summaryrefslogtreecommitdiffstats
path: root/kalyptus
diff options
context:
space:
mode:
authorDarrell Anderson <[email protected]>2013-05-04 23:52:45 -0500
committerDarrell Anderson <[email protected]>2013-05-04 23:52:45 -0500
commitd84f35f4056f3175f0a7e2a16e7a00b2276206be (patch)
tree65e3ae159ad9018bba5e37e62b53e080889bbaf7 /kalyptus
parentea64efae1b174ca348967f6ad42d49873843ac70 (diff)
downloadlibtqt-perl-d84f35f4056f3175f0a7e2a16e7a00b2276206be.tar.gz
libtqt-perl-d84f35f4056f3175f0a7e2a16e7a00b2276206be.zip
Fix inadvertent renaming.
Diffstat (limited to 'kalyptus')
-rw-r--r--kalyptus/kalyptus14
1 files changed, 7 insertions, 7 deletions
diff --git a/kalyptus/kalyptus b/kalyptus/kalyptus
index 224ac09..058f7d8 100644
--- a/kalyptus/kalyptus
+++ b/kalyptus/kalyptus
@@ -23,7 +23,7 @@ use kdocParseDoc;
use vars qw/ %rootNodes $declNodeType @includes_list %options @formats_wanted $allow_k_dcop_accessors
@includeclasses $includeclasses $skipInternal %defines $defines $match_qt_defines
$libdir $libname $outputdir @libs $parse_global_space $qt_embedded $qt4 $striphpath $doPrivate $readstdin
- $Version $tquiet $debug $debuggen $parseonly $currentfile $cSourceNode $exe
+ $Version $quiet $debug $debuggen $parseonly $currentfile $cSourceNode $exe
%formats %flagnames @allowed_k_dcop_accesors $allowed_k_dcop_accesors_re $rootNode
@classStack $cNode $globalSpaceClassName
$lastLine $docNode @includes $cpp $defcppcmd $cppcmd $docincluded
@@ -52,7 +52,7 @@ $includeclasses = "";
$doPrivate = 0;
$Version = "0.9";
-$tquiet = 0;
+$quiet = 0;
$debug = 0;
$debuggen = 0;
$parseonly = 0;
@@ -201,7 +201,7 @@ GetOptions( \%options,
"define=s", \%defines, # define a single preprocessing symbol
"defines=s", \$defines, # file containing preprocessing symbols, one per line
- "tquiet|q", \$tquiet,
+ "quiet|q", \$quiet,
"debug|D", \$debug, # debug the parsing
"debuggen", \$debuggen, # debug the file generation
"parse-only", \$parseonly )
@@ -221,7 +221,7 @@ else {
if ($#includeclasses>=0)
{
$includeclasses = join (" ", @includeclasses);
- print "Using Classes: $includeclasses\n" unless $tquiet;
+ print "Using Classes: $includeclasses\n" unless $quiet;
}
if ( $#includes >= 0 && !$cpp ) {
@@ -330,7 +330,7 @@ sub readLibraries
require kdocLib;
foreach my $lib ( @libs ) {
- print "$exe: reading lib: $lib\n" unless $tquiet;
+ print "$exe: reading lib: $lib\n" unless $quiet;
my $relpath = exists $options{url} ?
$options{url} : $outputdir;
@@ -366,7 +366,7 @@ sub parseFiles
|| croak "Can't read from $currentfile";
}
- print STDERR "$exe: processing $currentfile\n" unless $tquiet;
+ print STDERR "$exe: processing $currentfile\n" unless $quiet;
# reset vars
$rootNode = getRoot( $lang );
@@ -415,7 +415,7 @@ sub writeDocumentation
require $pack.".pm";
print STDERR "Generating bindings for $format ",
- "language...\n" unless $tquiet;
+ "language...\n" unless $quiet;
my $f = "$pack\::writeDoc";
&$f( $libname, $node, $outputdir, \%options );