diff options
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/README | 2 | ||||
| -rwxr-xr-x | scripts/buildnr.pl | 6 | ||||
| -rwxr-xr-x | scripts/config.sh | 6 | ||||
| -rwxr-xr-x | scripts/screen.sh | 2 | ||||
| -rwxr-xr-x | scripts/setglobvals.pl | 2 | ||||
| -rwxr-xr-x | scripts/stats.pl | 26 |
6 files changed, 23 insertions, 21 deletions
diff --git a/scripts/README b/scripts/README index 189b169..4a94391 100644 --- a/scripts/README +++ b/scripts/README @@ -1,4 +1,4 @@ -All scripts should be run from the yChat main directory, example: +All scripts should be run from the yhttpd main directory, example: ./scripts/makeyhttpd.pl diff --git a/scripts/buildnr.pl b/scripts/buildnr.pl index ee3d3e2..4698f8d 100755 --- a/scripts/buildnr.pl +++ b/scripts/buildnr.pl @@ -1,8 +1,8 @@ #!/usr/bin/perl -# The yChat Project (2003) +# The yhttpd Project (2003) # -# This script increases the BUILNR of msgs,h each time the yChat +# This script increases the BUILNR of msgs,h each time the yhttpd # gets recompiled! use strict; @@ -13,7 +13,7 @@ close MSGS; foreach (@msgs) { - if ( /define BUILDNR/ ) + if ( /BUILDNR/ ) { s/(BUILDNR )(.+)$/$1.($2+1)/e; print; diff --git a/scripts/config.sh b/scripts/config.sh index 373fad4..f301246 100755 --- a/scripts/config.sh +++ b/scripts/config.sh @@ -1,5 +1,5 @@ #!/bin/sh -# The yChat Project (2004) +# The yhttpd Project (2004) # # This script modifues the src/glob.h file. @@ -15,11 +15,11 @@ perl -e ' use scripts::modules::file; print <<END; -Welcome to the yChat configurator! +Welcome to the yhttpd configurator! You may also edit the src/glob.h file manually instead of using this configurator option. Please also notice that this are only before-compile options. All setups which can be made after com- -iling are placed in the yChat configuration file. +iling are placed in the yhttpd configuration file. END my $sep = "================================================================\n"; my $stdin; diff --git a/scripts/screen.sh b/scripts/screen.sh index 6d5b7aa..5c227fc 100755 --- a/scripts/screen.sh +++ b/scripts/screen.sh @@ -1,3 +1,3 @@ #!/bin/sh -screen -S ychat ./bin/ychat +screen -S yhttpd ./bin/yhttpd diff --git a/scripts/setglobvals.pl b/scripts/setglobvals.pl index 13288a5..1ee1de4 100755 --- a/scripts/setglobvals.pl +++ b/scripts/setglobvals.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -# The yChat Project (2003) +# The yhttpd Project (2003) # # This script sets up some variables in src/glob.h diff --git a/scripts/stats.pl b/scripts/stats.pl index e5cc2b3..fcbcd33 100755 --- a/scripts/stats.pl +++ b/scripts/stats.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -# The yChat Project (2003 - 2004) +# The yhttpd Project (2003 - 2004) # # This script generates source code and project statistics @@ -9,7 +9,6 @@ use strict; use scripts::modules::file; my %stats; -my $param = shift; &recursive("."); @@ -18,16 +17,19 @@ $stats{"Lines total"} = $stats{"Lines of source"} + $stats{"Lines of text"} + $stats{"Lines of HTML"}; -unless (defined $param) { - - print "$_ = " . $stats{$_} . "\n" - for ( sort keys %stats ); - -} else { - - print $stats{$_} . " " - for sort keys %stats; - +my $bool = 0; +foreach ( sort keys %stats ) +{ + if ($bool == 0) + { + print "$_ = " . $stats{$_} . "\n"; + $bool = 1; + } + else + { + print "$_ = " . $stats{$_} . "\n"; + $bool = 0; + } } print "\n"; |