chiark
/
gitweb
/
~ian
/
pandemic-rising-tide.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
e6fff77
)
drop dupe function
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Fri, 1 Mar 2019 13:41:52 +0000
(13:41 +0000)
committer
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Fri, 1 Mar 2019 13:41:52 +0000
(13:41 +0000)
generate-plag
patch
|
blob
|
history
diff --git
a/generate-plag
b/generate-plag
index c39e583c4b61ca6622923a6b1da16d6524976bcc..0a89ed26c45757e3d5a10f48cc0a8f6824a7fff6 100755
(executable)
--- a/
generate-plag
+++ b/
generate-plag
@@
-7,14
+7,6
@@
BEGIN { unshift @INC, qw(.); }
use Parse;
-sub plag_prs ($) {
- my ($t) = @_;
- $t = $` if $t =~ m/\n/;
- $t =~ s/ //g;
- $t =~ s/-//g;
- return "$t";
-}
-
sub output_planar_graph () {
foreach my $ra (sort keys %region) {
o(plag_prs($ra), "\n");