From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 13 Feb 2019 23:39:28 +0000 (+0000)
Subject: abbrev
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=fa8d7147f3e52668f0c685a8b72a9eb91b2d1914;p=pandemic-rising-tide.git

abbrev
---

diff --git a/parse-input-graph b/parse-input-graph
index 8644ea3..9d2dbee 100755
--- a/parse-input-graph
+++ b/parse-input-graph
@@ -265,7 +265,8 @@ sub o { print @_ or die $!; }
 sub plag_prv ($) {
     my ($vi) = @_;
     my $t = $vertex[$vi]{Text};
-    $t =~ s/\n/ | /g;
+    $t = $` if $t =~ m/\n/;
+    $t =~ s/ //g;
     return "\"$t\"";
 }