… | … | ||
---|---|---|---|
104 | 104 | ||
105 | sub conn::get_statdata { | 105 | sub conn::get_statdata { |
106 | my $self = shift; | 106 | my $self = shift; |
107 | 107 | ||
108 | my $mtime = $self->{stat}[9]; | 108 | my $mtime = $self->{stat}[9]; |
109 | print "mtime is $mtime\n";#d# | ||
110 | 109 | ||
111 | my $st = sql_exec \my($statdata), | 110 | my $st = sql_exec \my($statdata), |
112 | "select statdata from diridx where mtime = ? and path = ?", | 111 | "select statdata from diridx where mtime = ? and path = ?", |
113 | $mtime, $self->{path}; | 112 | $mtime, $self->{path}; |
114 | 113 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |