|
|
|
@ -390,9 +390,9 @@ sub process_arguments |
|
|
|
while ($_ = shift @ARGV) |
|
|
|
while ($_ = shift @ARGV) |
|
|
|
{ |
|
|
|
{ |
|
|
|
SWITCH: { |
|
|
|
SWITCH: { |
|
|
|
/^--version$/ && do { print $version; finish(); }; |
|
|
|
/^(-v)|(--version)$/ && do { print $version; finish(); }; |
|
|
|
/^--author$/ && do { print $author; finish(); }; |
|
|
|
/^--author$/ && do { print $author; finish(); }; |
|
|
|
/^--help$/ && do { |
|
|
|
/^(-h)|(--help)$/ && do { |
|
|
|
print <<DONE; |
|
|
|
print <<DONE; |
|
|
|
kdecvs-build version $version |
|
|
|
kdecvs-build version $version |
|
|
|
This script automates (well, attempts to :-) ) the download, build, |
|
|
|
This script automates (well, attempts to :-) ) the download, build, |
|
|
|
|