[Catalyst-commits] r13983 - CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter

[dd070 at dev.catalyst.perl.org]

Author: dd070
Date: 2011-03-07 15:17:38 +0000 (Mon, 07 Mar 2011)
New Revision: 13983

Modified:
   CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/GTK.pm
Log:
removed unused variables and updated POD

Modified: CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/GTK.pm
===================================================================
--- CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/GTK.pm	2011-03-07 11:54:12 UTC (rev 13982)
+++ CatalystX-Restarter-GTK/trunk/lib/CatalystX/Restarter/GTK.pm	2011-03-07 15:17:38 UTC (rev 13983)
@@ -11,7 +11,7 @@
 use IO::Handle           qw();
 use namespace::autoclean;
 
-our $VERSION = '0.02';
+our $VERSION = '0.03';
 
 extends 'Catalyst::Restarter';
 
@@ -330,10 +330,6 @@
 
     my $status  = Gtk2::Label->new;
 
-    my $bt_restart = Gtk2::Button->new('Restart');
-
-    my $bt_console = Gtk2::Button->new('Console');
-
     my $menu_bar = Gtk2::MenuBar->new;
     my $view = Gtk2::MenuItem->new('_View');
     my $mview = Gtk2::Menu->new;
@@ -463,6 +459,7 @@
 
     #!/bin/bash
     cd /home/username/myapp/trunk/
+    export CATALYST_RESTARTER=CatalystX::Restarter::GTK
     perl script/myapp_server.pl -r 
 
 To use this restarter for specific application only, set appropirate envioronment variable.