about summary refs log tree commit homepage
path: root/lib/PublicInbox/LeiSavedSearch.pm
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2021-04-16 16:10:27 -0700
committerEric Wong <e@80x24.org>2021-04-16 22:24:47 -0400
commit2e4e4b0d6f30d9d4612066395ba694c7c7d61e6e (patch)
tree7478cde9a242d7828792c458c442f6e69d3331d3 /lib/PublicInbox/LeiSavedSearch.pm
parentfd3b46aa0577d62553f61054270db6626ccc6759 (diff)
downloadpublic-inbox-2e4e4b0d6f30d9d4612066395ba694c7c7d61e6e.tar.gz
Somebody may want a saved search which consistently asks for
messages within a rolling time period window.  In other words,
we want to support using "lei q --save dt:last.week.." and keeps
the "dt:last.week.." relative to whenever "lei up" is run.  This
ensures relative date-time specifications get used in the future
rather than converting into an absolute date-time from the
initial "lei q" invocation.
Diffstat (limited to 'lib/PublicInbox/LeiSavedSearch.pm')
-rw-r--r--lib/PublicInbox/LeiSavedSearch.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/PublicInbox/LeiSavedSearch.pm b/lib/PublicInbox/LeiSavedSearch.pm
index 815008fd..e79cf76a 100644
--- a/lib/PublicInbox/LeiSavedSearch.pm
+++ b/lib/PublicInbox/LeiSavedSearch.pm
@@ -25,12 +25,13 @@ sub new {
         } else { # new saved search "lei q --save"
                 my $saved_dir = $lei->store_path . '/../saved-searches/';
                 my (@name) = ($lei->{ovv}->{dst} =~ m{([\w\-\.]+)/*\z});
-                push @name, to_filename($lei->{mset_opt}->{qstr});
+                my $q = $lei->{mset_opt}->{q_raw} // die 'BUG: {q_raw} missing';
+                my $q_raw_str = ref($q) ? "@$q" : $q;
+                push @name, to_filename($q_raw_str);
                 $dir = $saved_dir . join('-', @name);
                 require File::Path;
                 File::Path::make_path($dir); # raises on error
                 $self->{'-f'} = "$dir/lei.saved-search";
-                my $q = $lei->{mset_opt}->{q_raw};
                 if (ref $q) {
                         cfg_set($self, '--add', 'lei.q', $_) for @$q;
                 } else {