Parent Directory
| 
Revision Log
| 
Patch
| revision 53 by dpavlin, Wed Feb 21 16:06:25 2007 UTC | revision 57 by dpavlin, Wed Feb 21 17:42:24 2007 UTC | |
|---|---|---|
| # | Line 179 sub finish { | Line 179 sub finish { |
| 179 | undef $writer; | undef $writer; |
| 180 | } | } |
| 181 | ||
| 182 | =for TODO | |
| 183 | ||
| 184 | sub _signal { | sub _signal { |
| 185 | my $s = shift; | my $s = shift; |
| 186 | warn "catched SIG $s\n"; | warn "catched SIG $s\n"; |
| # | Line 190 $SIG{'__DIE__'} = \&_signal; | Line 192 $SIG{'__DIE__'} = \&_signal; |
| 192 | $SIG{'INT'} = \&_signal; | $SIG{'INT'} = \&_signal; |
| 193 | $SIG{'QUIT'} = \&_signal; | $SIG{'QUIT'} = \&_signal; |
| 194 | ||
| 195 | =cut | |
| 196 | ||
| 197 | =head2 snippet | =head2 snippet |
| 198 |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |