Login | Register
My pages Projects Community openCollabNet

Discussions > cvs > CVS update: /insurrection/src/admin.pl

Project highlights: A modern, light-weight, self-contained, web-based toolset for Subversion repository browsing and administration.  A live system can be seen in action here.

insurrection
Discussion topic

Back to topic list

CVS update: /insurrection/src/admin.pl

Author mksoft
Full name Michae Sinz
Date 2007-06-16 04:42:46 PDT
Message User: mksoft
Date: 2007-06-16 04:42:46-0700
Log:
 Merged up to r343 of http://svn.sinz.com/​svn/Insurrection/tru​nk

File Changes:

Directory: /insurrection/src/
=============================

File [changed]: admin.pl
Url: http://insurrection.​tigris.org/source/br​owse/insurrection/sr​c/admin.pl?r1=1.51​&r2=1.52
Delta lines: +4 -4
-------------------
--- admin.pl 2007-01-06 22:04:45-0700 1.51
+++ admin.pl 2007-06-16 04:42:44-0700 1.52
@@ -1,5 +1,5 @@
 #
-# $Id: admin.pl,v 1.51 2007/01/07 05:04:45 mksoft Exp $
+# $Id: admin.pl,v 1.52 2007/06/16 11:42:44 mksoft Exp $
 # Copyright 2004-2006 - Michael Sinz
 #
 # This is some common code that all of the Perl code
@@ -367,7 +367,7 @@
    my $version = shift;
 
    ## Use the version of this file if there was no version passed.
- $version = '$Id: admin.pl,v 1.51 2007/01/07 05:04:45 mksoft Exp $' if (!defined $version);
+ $version = '$Id: admin.pl,v 1.52 2007/06/16 11:42:44 mksoft Exp $' if (!defined $version);
 
    ## Now, lets just use the version information a title attribute of the footer
 
@@ -711,7 +711,7 @@
             %{$groupUsers{$section}} = %empty;
          }
       }
- elsif (($line =~ m/^(Admin\S*)\s+=\s*(.*?)$/o) && ($section eq 'groups'))
+ elsif (($line =~ m/^(Admin\S*)\s*=\s*(.*?)$/o) && ($section eq 'groups'))
       {
          ## Ahh, an admin definition - now lets deal with it...
          my $group = $1;
@@ -719,7 +719,7 @@
 
          @{$groupAdmins{$group}} = @users;
       }
- elsif (($line =~ m/^(\S+)\s+=\s*(.*?)$/o) && ($section ne 'groups'))
+ elsif (($line =~ m/^(\S+)\s*=\s*(.*?)$/o) && ($section ne 'groups'))
       {
          my $user = $1;
          my $access = $2;

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

Messages

Show all messages in topic

CVS update: /insurrection/src/admin.pl mksoft Michae Sinz 2007-06-16 04:42:46 PDT
Messages per page: