diff options
| -rw-r--r-- | lib/PublicInbox/LeiForgetSearch.pm | 2 | ||||
| -rw-r--r-- | t/lei-q-save.t | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/lib/PublicInbox/LeiForgetSearch.pm b/lib/PublicInbox/LeiForgetSearch.pm index b5fe5fb1..717fa5e9 100644 --- a/lib/PublicInbox/LeiForgetSearch.pm +++ b/lib/PublicInbox/LeiForgetSearch.pm @@ -12,7 +12,7 @@ use SelectSaver; sub lei_forget_search { my ($lei, $out) = @_; - my $d = PublicInbox::LeiSavedSearch::lss_dir_for($lei, \$out); + my $d = PublicInbox::LeiSavedSearch::lss_dir_for($lei, \$out, 1); if (-e $d) { my $save; my $opt = { safe => 1 }; diff --git a/t/lei-q-save.t b/t/lei-q-save.t index 5940018c..05d5d9f4 100644 --- a/t/lei-q-save.t +++ b/t/lei-q-save.t @@ -173,6 +173,7 @@ test_lei(sub { symlink($o, "$home/ln -s") or skip "symlinks not supported in $home?: $!", 1; lei_ok('up', "$home/ln -s"); + lei_ok('forget-search', "$home/ln -s"); }; my $v2 = "$home/v2"; # v2: as an output destination |