Parent Directory
| 
Revision Log
| 
Patch
| revision 233 by dpavlin, Sun Aug 16 23:31:30 2009 UTC | revision 242 by dpavlin, Mon Aug 17 10:28:17 2009 UTC | |
|---|---|---|
| # | Line 19 sub mirror_file { | Line 19 sub mirror_file { |
| 19 | } | } |
| 20 | ||
| 21 | my $once_path = '/tmp/pxelator.once'; | my $once_path = '/tmp/pxelator.once'; |
| 22 | our $just_once = retrieve $once_path; | our $just_once = retrieve $once_path if -e $once_path; |
| 23 | sub first_time { | sub first_time { |
| 24 | my $what = shift; | my $what = shift; |
| 25 | return if $just_once->{$what}++; | return if $just_once->{$what}++; |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |