Changeset 401
- Timestamp:
- 11/11/11 18:53:03 (12 years ago)
- Location:
- bot/trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
bot/trunk/bin/sophie-bot
r399 r401 19 19 'daemon' => \my $daemon, 20 20 'runas=s' => \my $runas, 21 'pidfile=s' => \my $pidfile, 21 22 22 23 # Command option: … … 41 42 $proxy ||= $config{proxy}; 42 43 $runas ||= $config{runas}; 44 $pidfile ||= $config{pidfile}; 43 45 } 44 46 … … 111 113 } 112 114 115 if ($pidfile) { 116 if (open(my $handle, '>', $pidfile)) { 117 print $handle $$ . "\n"; 118 close($handle); 119 } else { 120 } 121 } 122 113 123 $sc->run; 114 124 -
bot/trunk/lib/Sophie/Bot/IRC.pm
r397 r401 41 41 package_states => [ 42 42 ref($self) => [ qw(_start irc_001 irc_public irc_msg ping_server 43 irc_pong ) ],43 irc_pong irc_433) ], 44 44 ], 45 45 );
Note: See TracChangeset
for help on using the changeset viewer.