summaryrefslogtreecommitdiff
path: root/bin/locmaint
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2020-02-09 12:28:20 -0700
committerSean Whitton <spwhitton@spwhitton.name>2020-02-09 12:28:20 -0700
commit3b3f39226729c27154bc653408e0b7e6d55f96c9 (patch)
tree339a0f08885501442bf501d5c9117d4dc1083cb2 /bin/locmaint
parent077816ac1acf33419a54b5d859e695aced4711df (diff)
downloaddotfiles-3b3f39226729c27154bc653408e0b7e6d55f96c9.tar.gz
comment
Diffstat (limited to 'bin/locmaint')
-rwxr-xr-xbin/locmaint11
1 files changed, 4 insertions, 7 deletions
diff --git a/bin/locmaint b/bin/locmaint
index 25f693c2..ee05ea2c 100755
--- a/bin/locmaint
+++ b/bin/locmaint
@@ -119,13 +119,10 @@ for (getpwuid($<) . '@' . `hostname -f`) {
exit main();
sub main {
- # TODO is it possible to let C-c kill processes we spawn, too?
- # myrepos might achieve this by means of its
- # terminal_friendly_spawn(), though note that a dependency of
- # locmaint on IO::Pty::Easy can be at most optional
- #
- # The basic problem here is that C-c goes to the child process,
- # not to locmaint
+ # note that if Local::Interactive::system_pty_capture falls back
+ # to calling script(1), this interrupt handler will not work, and
+ # indeed C-c will not get us out of locmaint at all. So let's
+ # hope IO::Pty is available.
$SIG{INT} = sub { say STDERR "\nlocmaint: interrupted"; exit 2 };
# Parse command line. If any of these get set to false, skip