Login | Register
My pages Projects Community openCollabNet

Discussions > cvs > CVS update: /svnutils/trunk/src/

svnutils
Discussion topic

Back to topic list

CVS update: /svnutils/trunk/src/

Author sunny256
Full name Øyvind A. Holm
Date 2005-08-20 07:39:45 PDT
Message User: sunny256
Date: 2005/08/20 07:39:45

Modified:
   svnutils/trunk/src/sident

Log:
 r152 | sunny256 | 2005-08-20 03:54:46 +0000 (Sat, 20 Aug 2005) | 6 lines
 
 Drop this $VERSION thing and just use the standard $Id$ string.
 
 * /trunk/src/sident
   ($VERSION, $id_date): Gone.
   (usage): Print the value of $rcs_id instead.

File Changes:

Directory: /svnutils/trunk/src/
===============================

File [changed]: sident
Url: http://svnutils.tigr​is.org/source/browse​/svnutils/trunk/src/​sident?r1=1.9&r2​=1.10
Delta lines: +5 -8
-------------------
--- sident 20 Aug 2005 14:38:27 -0000 1.9
+++ sident 20 Aug 2005 14:39:42 -0000 1.10
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 
 #===================​====================​====================​============
-# $Id: sident 151 2005-08-20 02:43:18Z sunny256 $
+# $Id: sident 152 2005-08-20 03:54:46Z sunny256 $
 # Lists RCS-like keywords in files. Replacement for ident(1).
 #
 # Character set: UTF-8
@@ -19,14 +19,11 @@
 our ($opt_help, $opt_known, $opt_namesonly, $opt_verbose) =
     ( 0, 0, 0, 0);
 
-my $VERSION = "0.0";
-
 our $progname = $0;
 $progname =~ s#^.*/(.*?)$#$1#;
 
-my $rcs_id = '$Id: sident 151 2005-08-20 02:43:18Z sunny256 $';
+my $rcs_id = '$Id: sident 152 2005-08-20 03:54:46Z sunny256 $';
 my $id_date = $rcs_id;
-$id_date =~ s/^.*?\d+ (\d\d\d\d-.*?\d​\d:\d\d:\d\d\S​+).*/$1/;
 
 Getopt::Long::Config​ure("bundling");
 GetOptions(
@@ -82,7 +79,7 @@
     my $Retval = shift;
     print(<<END);
 
-$progname v$VERSION -- $id_date
+$rcs_id
 
 Usage: $progname [options] [file [files [...]]]
 
@@ -130,7 +127,7 @@
 
 =head1 REVISION
 
-$Id: sident 151 2005-08-20 02:43:18Z sunny256 $
+$Id: sident 152 2005-08-20 03:54:46Z sunny256 $
 
 =head1 SYNOPSIS
 
@@ -199,4 +196,4 @@
 # }}}
 
 # vim: set fenc=UTF-8 ft=perl fdm=marker ts=4 sw=4 sts=4 et fo+=w :
-# End of file $Id: sident 151 2005-08-20 02:43:18Z sunny256 $
+# End of file $Id: sident 152 2005-08-20 03:54:46Z sunny256 $

« Previous message in topic | 1 of 1 | Next message in topic »

Messages

Show all messages in topic

CVS update: /svnutils/trunk/src/ sunny256 Øyvind A. Holm 2005-08-20 07:39:45 PDT
Messages per page: