| # | Line 105 | Line 105 | elsif ($arg =~ m/-kill/) | |
|---|---|---|
| 105 | ||
| 106 | print "Are you cancelling this task? (y/N): "; | |
| 107 | my $response = <STDIN>; | |
| 108 | + | $response =~ s/\n//g; |
| 109 | deleteEntry ($id) if lc ($response) eq "y"; | |
| 110 | system ("crab $arg"); | |
| 111 | } | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |