From 602b4bd771f6476eda740a64a8c83c687abf4572 Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Wed, 13 Jun 2007 22:57:00 +0100 Subject: [PATCH] fix git version/build code correctly add finer graded .gitignores --- .gitignore | 1 + data/.gitignore | 8 ++++++++ filter/.gitignore | 1 + perl/cluster.pl | 9 +-------- 4 files changed, 11 insertions(+), 8 deletions(-) create mode 100644 .gitignore create mode 100644 data/.gitignore create mode 100644 filter/.gitignore diff --git a/.gitignore b/.gitignore new file mode 100644 index 00000000..928643d3 --- /dev/null +++ b/.gitignore @@ -0,0 +1 @@ +local* diff --git a/data/.gitignore b/data/.gitignore new file mode 100644 index 00000000..fea0d517 --- /dev/null +++ b/data/.gitignore @@ -0,0 +1,8 @@ +bad* +debug +*.db +*.v? +spots +user* +dupefile +log diff --git a/filter/.gitignore b/filter/.gitignore new file mode 100644 index 00000000..150f68c8 --- /dev/null +++ b/filter/.gitignore @@ -0,0 +1 @@ +*/* diff --git a/perl/cluster.pl b/perl/cluster.pl index 8aade278..8f7106d9 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -121,7 +121,7 @@ use vars qw(@inqueue $systime $version $starttime $lockfn @outstanding_connects @inqueue = (); # the main input queue, an array of hashes $systime = 0; # the time now (in seconds) -$version = "1.52"; # the version no of the software +$version = "1.53"; # the version no of the software $starttime = 0; # the starting time of the cluster #@outstanding_connects = (); # list of outstanding connects @listeners = (); # list of listeners @@ -131,13 +131,6 @@ $allowdxby = 0; # 1 = allow "dx by ", 0 - don't allow it use vars qw($VERSION $BRANCH $build $branch); -$VERSION = sprintf( "%d.%03d", q$Revision$ =~ /(\d+)\.(\d+)/ ); -$BRANCH = sprintf( "%d.%03d", q$Revision$ =~ /\d+\.\d+\.(\d+)\.(\d+)/ || (0,0)); -$main::build += $VERSION; -$main::branch += $BRANCH; -$main::build -= 3; # fudge (put back for now) - - # send a message to call on conn and disconnect sub already_conn -- 2.34.1