From: martin f. krafft Date: Mon, 20 Sep 2021 02:35:59 +0000 (+0200) Subject: Do not store version reference in %IRSSI/$VERSION X-Git-Url: http://git.99rst.org/?a=commitdiff_plain;h=a627cc9837bb7ecd7ff1476d3fc28e0b886b79b0;p=irssi-scripts.irssi.org.git Do not store version reference in %IRSSI/$VERSION Cf. https://github.com/irssi/scripts.irssi.org/issues/789 Signed-off-by: martin f. krafft --- diff --git a/scripts/chankeys.pl b/scripts/chankeys.pl index c13179f..412d623 100644 --- a/scripts/chankeys.pl +++ b/scripts/chankeys.pl @@ -72,18 +72,19 @@ use warnings; use Irssi; use version; -our $VERSION = version->parse('0.3'); - our %IRSSI = ( authors => 'martin f. krafft', contact => 'madduck@madduck.net', name => 'chankeys', description => 'manage channel keyboard shortcuts', license => 'MIT', - version => $VERSION, + version => '0.3', changed => '2021-09-06' ); +our $VERSION = $IRSSI{version}; +my $_VERSION = version->parse($VERSION); + ### DEFAULTS AND SETTINGS ###################################################### my $map_file = Irssi::get_irssi_dir()."/chankeys"; @@ -328,7 +329,7 @@ sub save_mappings { my ($filename) = @_; open(FH, '+>', $filename) || error("Cannot create mappings file: $!"); print FH <<"EOF"; -; chankeys keymap file (version: $VERSION) +; chankeys keymap file (version: $_VERSION) ; ; WARNING: this file will be overwritten on /save, ; use "/set chankey_autosave off" to avoid.