diff options
author | Florian Pritz <bluewind@xinu.at> | 2018-12-23 19:44:30 +0100 |
---|---|---|
committer | Florian Pritz <bluewind@xinu.at> | 2018-12-23 19:44:30 +0100 |
commit | dd9e411b3722a6b7361ab4c179028c83e30909c2 (patch) | |
tree | 63ba6b6ffc3ffded49aded28866564ba37ccbd6c | |
parent | c94e5fec4476b7dbdcf68e0c942166801637f83f (diff) | |
download | bin-dd9e411b3722a6b7361ab4c179028c83e30909c2.tar.gz bin-dd9e411b3722a6b7361ab4c179028c83e30909c2.tar.xz |
check-ciation-order.pl: Skip comments
Signed-off-by: Florian Pritz <bluewind@xinu.at>
-rwxr-xr-x | check-ciation-order.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/check-ciation-order.pl b/check-ciation-order.pl index 330c903..55046ad 100755 --- a/check-ciation-order.pl +++ b/check-ciation-order.pl @@ -13,6 +13,7 @@ my %seen; my %output; while (<<>>) { + next if m/^\s*%/; while (m/\\(?<cmd>citea?)\{(?<keys>.*?)\}/g) { my $keys = $+{keys}; my $cmd = $+{cmd}; |