Changeset 10615 for trunk/Padre/lib/Padre/Plugin/PopularityContest/Ping.pm

Timestamp:

02/08/10 02:23:11 (2 years ago)

Author:

adamk

Message:

Added support for --reset to flush and reset the configuration to defaults, because the Swarm plugin is instantly segfaulting Padre at startup and I didn't want to have to keep resetting the configuration by hand all the time.

File:

• trunk/Padre/lib/Padre/Plugin/PopularityContest/Ping.pm (modified) (2 diffs)

trunk/Padre/lib/Padre/Plugin/PopularityContest/Ping.pm

@@ -25 +25 @@
         my $dir = $0;
         $dir =~ s/padre$//;
-        my $revision = Padre::Util::svn_directory_revision($dir);
-        if ( -d "$dir.svn" ) {
-            $data{svn} = $revision;
-        }
+        require Padre::Util::SVN;
+        my $revision = Padre::Util::SVN::directory_revision($dir);
+        $data{svn} = $revision if -d "$dir.svn";
     }
 
@@ -36 +35 @@
 
     # Hand off to the parent constructor
-    return $class->SUPER::new( request => HTTP::Request->new( GET => $url->as_string ) );
+    return $class->SUPER::new(
+        request => HTTP::Request->new( GET => $url->as_string )
+    );
 }