Parent Directory | Revision Log | Patch
revision 120 by dpavlin, Mon Apr 17 10:34:14 2006 UTC | revision 121 by dpavlin, Mon Apr 17 10:38:17 2006 UTC | |
---|---|---|
# | Line 195 sub file { | Line 195 sub file { |
195 | my $contents; | my $contents; |
196 | ||
197 | return if (! $force && -l $path || $path =~ m#/.svn# || $path =~ m/(~|.bak|.gif)$/); | return if (! $force && -l $path || $path =~ m#/.svn# || $path =~ m/(~|.bak|.gif)$/); |
198 | return if (! $all && -d $path); | |
199 | ||
200 | my $mtime = (stat($path))[9] || -1; | my $mtime = (stat($path))[9] || -1; |
201 | my $mtime_db = eval { $db->get_doc_attr_by_uri("file:///$path", '@mtime') }; | my $mtime_db = eval { $db->get_doc_attr_by_uri("file:///$path", '@mtime') }; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |