projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
experimental branch to improve spot query
[spider.git]
/
cmd
/
show
/
dx.pl
diff --git
a/cmd/show/dx.pl
b/cmd/show/dx.pl
index 5387b7f407657ee5591711a0ae6a040abc5bf04b..7e4d3a3587e8d7c655820f5c560dd1d5979130d3 100644
(file)
--- a/
cmd/show/dx.pl
+++ b/
cmd/show/dx.pl
@@
-143,11
+143,7
@@
sub handle
} else {
$pre .= '*' unless $pre =~ /[\*\?\[]$/o;
$pre = shellregex($pre);
} else {
$pre .= '*' unless $pre =~ /[\*\?\[]$/o;
$pre = shellregex($pre);
- if ($usesql) {
- $pre =~ s/\.\*/%/g;
- } else {
- $pre =~ s/\.\*\$$//;
- }
+ $pre =~ s/\.\*\$$//;
$pre .= '$' if $exact;
$pre =~ s/\^//;
push @flist, 'call', $pre;
$pre .= '$' if $exact;
$pre =~ s/\^//;
push @flist, 'call', $pre;
@@
-167,7
+163,7
@@
sub handle
# now do the search
if ($self->{_nospawn}) {
# now do the search
if ($self->{_nospawn}) {
- my @res = Spot::search($expr, $fromday, $today, $from, $to, $user, $dofilter
? $self : unde
f);
+ my @res = Spot::search($expr, $fromday, $today, $from, $to, $user, $dofilter
, $sel
f);
my $ref;
my @dx;
foreach $ref (@res) {
my $ref;
my @dx;
foreach $ref (@res) {
@@
-186,7
+182,7
@@
sub handle
}
else {
push @out, $self->spawn_cmd("sh/dx $line", \&Spot::search,
}
else {
push @out, $self->spawn_cmd("sh/dx $line", \&Spot::search,
- args => [$expr, $fromday, $today, $from, $to, $filter, $dofilter
? $self : unde
f],
+ args => [$expr, $fromday, $today, $from, $to, $filter, $dofilter
, $sel
f],
cb => sub {
my ($dxchan, @res) = @_;
my $ref;
cb => sub {
my ($dxchan, @res) = @_;
my $ref;