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 |