diff options
author | B. Stack <bgstack15@gmail.com> | 2022-11-09 16:04:18 -0500 |
---|---|---|
committer | B. Stack <bgstack15@gmail.com> | 2022-11-09 16:04:18 -0500 |
commit | f183cfec8b565beeafd93f8f8b76a23fa71e78ff (patch) | |
tree | 654464b353c105428b65355a80d1322a2301483c /fluxbox/debian/update-init.pl | |
parent | Merge branch 'freefilesync-bump' into 'master' (diff) | |
download | stackrpms-f183cfec8b565beeafd93f8f8b76a23fa71e78ff.tar.gz stackrpms-f183cfec8b565beeafd93f8f8b76a23fa71e78ff.tar.bz2 stackrpms-f183cfec8b565beeafd93f8f8b76a23fa71e78ff.zip |
add fluxbox
Diffstat (limited to 'fluxbox/debian/update-init.pl')
-rw-r--r-- | fluxbox/debian/update-init.pl | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/fluxbox/debian/update-init.pl b/fluxbox/debian/update-init.pl new file mode 100644 index 0000000..dcbf70c --- /dev/null +++ b/fluxbox/debian/update-init.pl @@ -0,0 +1,31 @@ +#!/usr/bin/perl + +use warnings; +use strict; + +my ($init) = $ARGV[0]; + +die "init not found!" unless $init; + +open my $file, '+<', $init + or die "Can not open file `$init': $!\n"; + +my @data= + map { chomp; $_ } + grep !/\.strftimeFormat:/, + grep !/\.toolbar\.tools:/, + grep !/toolbar\.widthPercent:/, <$file>; + + +push @data, +( + 'session.screen0.toolbar.widthPercent: 100', + 'session.screen0.strftimeFormat: %d %b, %a %02k:%M:%S', + 'session.screen0.toolbar.tools: ' . + 'prevworkspace, workspacename, nextworkspace, ' . + 'clock, prevwindow, nextwindow, iconbar, systemtray', +); + +truncate $file, 0; +seek $file, 0, 0; +print $file join "\n", @data; |