Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
sub cmd_scrap () {
my ($ffq_prev, $gdrlast, $ffq_prev_commitish) = ffq_prev_info();
sub cmd_scrap () {
my ($ffq_prev, $gdrlast, $ffq_prev_commitish) = ffq_prev_info();
- fail "No ongoing git-debrebase session." unless $ffq_prev_commitish;
+ if (!$ffq_prev_commitish) {
+ fail "No ongoing git-debrebase session." unless $opt_noop_ok;
+ finish 0;
+ }
my $scrapping_head = get_head();
badusage "no arguments allowed" if @ARGV;
push @deferred_updates,
my $scrapping_head = get_head();
badusage "no arguments allowed" if @ARGV;
push @deferred_updates,