E CVS: CVSROOT xcomputerman

[enlightenment-cvs]

Enlightenment CVS committal

Author  : xcomputerman
Module  : CVSROOT

Dir     : CVSROOT


Modified Files:
        ciabot.pl 


Log Message:
Another approach...

===================================================================
RCS file: /cvsroot/enlightenment/CVSROOT/ciabot.pl,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -3 -r1.22 -r1.23
--- ciabot.pl   16 Jan 2004 07:50:43 -0000      1.22
+++ ciabot.pl   16 Jan 2004 08:00:25 -0000      1.23
@@ -27,7 +27,7 @@
 # If it does not work, try to disable $xml_rpc in the configuration section
 # below.
 #
-# $Id: ciabot.pl,v 1.22 2004/01/16 07:50:43 xcomputerman Exp $
+# $Id: ciabot.pl,v 1.23 2004/01/16 08:00:25 xcomputerman Exp $
 
 use strict;
 use vars qw ($project $from_email $dest_email $rpc_uri $sendmail $sync_delay
@@ -261,9 +261,16 @@
 
 for (my $dirnum = 0; $dirnum < @dir; $dirnum++) {
   map {
-    #$_ = $dir[$dirnum] . '/' . $_;
-    for (my $ix = 0; $ix < $pcount; $ix++) {
-       s#^[^/]*##; # weed out the module name
+    $_ = $dir[$dirnum] . '/' . $_;
+#    for (my $ix = 0; $ix < $pcount; $ix++) {
+      #   s#^[^/]*##; # weed out the module name
+#    }
+    if ($pcount eq 2) {
+      s#^.*?/.*?/##;
+    } elsif ($pcount eq 3) {
+      s#^.*?/.*?/.*?/##;
+    } else {
+      s#^.*?/##;
     }
     s/&/&amp;/g;
     s/</&lt;/g;




-------------------------------------------------------
The SF.Net email is sponsored by EclipseCon 2004
Premiere Conference on Open Tools Development and Integration
See the breadth of Eclipse activity. February 3-5 in Anaheim, CA.
http://www.eclipsecon.org/osdn
_______________________________________________
enlightenment-cvs mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs