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-02-08 10:09:11 PST
Message User: sunny256
Date: 05/02/08 10:09:11

Modified:
 /svnutils/trunk/src/
  svndiff

Log:
 r94 | sunny256 | 2005-02-08 17:31:34 +0000 (Tue, 08 Feb 2005) | 8 lines
 
 Separating out minor fixes to get rid of them before other changes are
 merged in.
 
 * /trunk/src/svndiff
   - Inserted chomp() and a debugging message in the <PipeFP> loop.
   - New temporary $File variable in the (sort @mod_array) loop.
   - Removed space in parantheses.

File Changes:

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

File [changed]: svndiff
Url: http://svnutils.tigr​is.org/source/browse​/svnutils/trunk/src/​svndiff?r1=1.5&r​2=1.6
Delta lines: +9 -6
-------------------
--- svndiff 26 Oct 2004 01:03:21 -0000 1.5
+++ svndiff 8 Feb 2005 18:09:10 -0000 1.6
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 
 #===================​====================​====================​============
-# $Id: svndiff 84 2004-10-26 00:59:13Z sunny256 $
+# $Id: svndiff 94 2005-02-08 17:31:34Z sunny256 $
 # Uses a specified diff program for viewing differences in a Subversion
 # versioned directory tree.
 #
@@ -46,13 +46,16 @@
 } else {
     if (open(PipeFP, "svn stat -q |")) {
         while (<PipeFP>) {
+ chomp();
+ D("<PipeFP> = \"$_\"\n");
             if (/^[$stat_chars]......(.*)/) {
                 push(@mod_array, $1);
             }
         }
         close(PipeFP);
         for (sort @mod_array) {
- diff_file($_);
+ my $File = $_;
+ diff_file($File);
         }
     } else {
         warn("$progname: Error opening \"svn stat -q\" pipe");
@@ -75,8 +78,8 @@
     D("File1 = \"$File1\"\n");
     D("File2 = \"$File2\"\n");
 
- (-e $File1) || ( warn("$File1: File not found\n"), return);
- (-e $File2) || ( warn("$File2: File not found, is not under version control\n"), return);
+ (-e $File1) || (warn("$File1: File not found\n"), return);
+ (-e $File2) || (warn("$File2: File not found, is not under version control\n"), return);
 
     if ($Cmd eq "vimdiff") {
         D("CMD: $Cmd $File1 $File2\n");
@@ -128,7 +131,7 @@
 
 =head1 REVISION
 
-$Id: svndiff 84 2004-10-26 00:59:13Z sunny256 $
+$Id: svndiff 94 2005-02-08 17:31:34Z sunny256 $
 
 =head1 SYNOPSIS
 
@@ -194,4 +197,4 @@
 # }}}
 
 # vim: set fenc=UTF-8 ft=perl fdm=marker ts=4 sw=4 sts=4 et fo+=w :
-# End of file $Id: svndiff 84 2004-10-26 00:59:13Z sunny256 $
+# End of file $Id: svndiff 94 2005-02-08 17:31:34Z sunny256 $




--------------------​--------------------​--------------------​---------
To unsubscribe, e-mail: cvs-unsubscribe@svnu​tils.tigris.org
For additional commands, e-mail: cvs-help at svnutils dot tigris dot org

« 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-02-08 10:09:11 PST
Messages per page: