github.com/wfjm.w11
1
0
Fork 0
mirror of https://github.com/wfjm/w11.git synced 2026-05-05 15:44:35 +00:00
Code Issues Releases Wiki Activity

xviv_msg_filter: allow {yyyy.x} tags (in addition to ranges)

Browse Source
This commit is contained in:
wfjm
2018-08-18 08:28:10 +02:00
parent b6074a354f
commit a8a1ed271b
2 changed files with 13 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
tools/bin/xviv_msg_filter
View File

@@ -1,7 +1,7 @@
#!/usr/bin/perl -w
# $Id: xviv_msg_filter 985 2018-01-03 08:59:40Z mueller $
# $Id: xviv_msg_filter 1039 2018-08-12 10:04:09Z mueller $
#
# Copyright 2016-2017 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
# Copyright 2016-2018 by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
#
# This program is free software; you may redistribute and/or modify it under
# the terms of the GNU General Public License as published by the Free
@@ -14,7 +14,8 @@
#
# Revision History:
# Date Rev Version Comment
# 2017-06-06 909 1,1 add version-range tags
# 2018-08-11 1039 1.1.1 allow {yyyy.x} tags (in addition to ranges)
# 2017-06-06 909 1.1 add version-range tags
# 2016-06-04 772 1.0 Initial version
#
@@ -223,6 +224,12 @@ sub read_mfs {
next unless $intyp; # only process relevant lines
if (m/\{(\d{4}\.\d)}/) { # {ver} tag found
$vermin = $1;
$vermax = $1;
next;
}
if (m/\{(\d{4}\.\d)?:(\d{4}\.\d)?\}/) { # {vermin:varmax} tag found
$vermin = (defined $1) ? $1 : "0000.0";
$vermax = (defined $2) ? $2 : "9999.9";