From 62dbdaa09239fd53b6cbf949fcca198cbcc8680f Mon Sep 17 00:00:00 2001 From: Gerhard Gonter <ggonter@gmail.com> Date: Tue, 12 Jul 2022 16:37:39 +0200 Subject: [PATCH] start screen with specific screenrc file, if available --- SLS | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/SLS b/SLS index 32a5c8e..8b75394 100755 --- a/SLS +++ b/SLS @@ -2,7 +2,7 @@ # # find or create screen session # -# $Id: SLS,v 1.3 2012/12/14 13:35:38 gonter Exp $ +# $Id: SLS,v 1.4 2022/04/15 15:46:06 gonter Exp $ # =pod @@ -93,12 +93,14 @@ if (@PARS) print ">>> $cmd_title\n"; system ($cmd_title) if ($doit); - my $cmd_screen= "screen -S '$wanted'"; - print ">>> $cmd_screen\n"; + my @cmd_screen= ('screen', '-S', $wanted); + my $rc_wanted= ".screenrc-$wanted"; + push (@cmd_screen, '-c', $rc_wanted) if (-f $rc_wanted); + print ">>> ", join(' ', @cmd_screen), "\n"; if ($doit) { if (!$dir_changed && $wanted =~ /notes/i) { &chdir ("common/Notes"); $dir_changed= 1; } - system ($cmd_screen); + system (@cmd_screen); } } elsif ($cnt == 1) -- GitLab