Parent Directory | Revision Log | Patch
revision 54 by dpavlin, Wed Jun 24 13:39:43 2009 UTC | revision 58 by dpavlin, Sat Jul 4 08:33:56 2009 UTC | |
---|---|---|
# | Line 63 sub http_server { | Line 63 sub http_server { |
63 | my ($client,$path) = @_; | my ($client,$path) = @_; |
64 | ||
65 | $path = "www/$path"; | $path = "www/$path"; |
66 | $path .= 'rfid.html' if $path =~ m{/$}; | |
67 | ||
68 | return unless -e $path; | return unless -e $path; |
69 | ||
# | Line 299 sub scan_for_tags { | Line 300 sub scan_for_tags { |
300 | if ( $http_server ) { | if ( $http_server ) { |
301 | http_server; | http_server; |
302 | } else { | } else { |
303 | scan_for_tags while 1; | while (1) { |
304 | scan_for_tags; | |
305 | sleep 1; | |
306 | } | |
307 | } | } |
308 | ||
309 | die "over and out"; | die "over and out"; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |