[paketler-commits] r23040 - devel/programming/tools/git/files

[paketler-uludag at uludag.org.tr]

Author: cartman
Date: Sun Apr  8 21:31:53 2007
New Revision: 23040

Modified:
   devel/programming/tools/git/files/project-root.patch
Log:
use Recai Oktaş's black magic version ;)


Modified: devel/programming/tools/git/files/project-root.patch
=================================================================
--- devel/programming/tools/git/files/project-root.patch	(original)
+++ devel/programming/tools/git/files/project-root.patch	Sun Apr  8 21:31:53 2007
@@ -1,28 +1,19 @@
 --- gitweb/gitweb.perl	2007-04-04 11:40:33.000000000 +0300
-+++ gitweb/gitweb.perl	2007-04-06 22:44:04.000000000 +0300
-@@ -32,8 +32,23 @@
++++ gitweb/gitweb.perl	2007-04-08 21:30:31.000000000 +0300
+@@ -32,8 +32,14 @@
  our $GIT = "++GIT_BINDIR++/git";
  
  # absolute fs-path which will be prepended to the project path
 -#our $projectroot = "/pub/scm";
 -our $projectroot = "++GITWEB_PROJECTROOT++";
-+our $projectroot;
-+open(CONF,"/etc/conf.d/gitweb");
++our $projectroot = "/usr/local/scm";
++open(CONF, '/etc/conf.d/gitweb');
 +
-+while(<CONF>)
-+{
-+    chomp;
-+    if ($_ !~ /^#.*/)
-+    {
-+        my @list = split(/=/);
-+        if ($list[0] eq "PROJECT_ROOT")
-+        {
-+            $list[1] =~ s/\"//g;
-+            $projectroot = $list[1];
-+            last;
-+        }
-+    }
++while (<CONF>) {
++    do { $projectroot = $1; last } if /^PROJECT_ROOT="([^"]+)"/;
 +}
++
++close(CONF);
  
  # target of the home link on top of all pages
  our $home_link = $my_uri || "/";