lib/PublicInbox/LeiEditSearch.pm

   1 # Copyright (C) 2021 all contributors <meta@public-inbox.org>
   2 # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
   3
   4 # "lei edit-search" edit a saved search following "lei q --save"
   5 package PublicInbox::LeiEditSearch;
   6 use strict;
   7 use v5.10.1;
   8 use PublicInbox::LeiSavedSearch;
   9 use PublicInbox::LeiUp;
  10
  11 sub lei_edit_search {
  12         my ($lei, $out) = @_;
  13         my $lss = PublicInbox::LeiSavedSearch->up($lei, $out) or return;
  14         my @cmd = (qw(git config --edit -f), $lss->{'-f'});
  15         $lei->qerr("# spawning @cmd");
  16         if ($lei->{oneshot}) {
  17                 exec(@cmd) or die "exec @cmd: $!\n";
  18         } else {
  19                 $lei->send_exec_cmd([], \@cmd, {});
  20         }
  21 }
  22
  23 *_complete_edit_search = \&PublicInbox::LeiUp::_complete_up;
  24
  25 1;