From fa8d7147f3e52668f0c685a8b72a9eb91b2d1914 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Wed, 13 Feb 2019 23:39:28 +0000 Subject: [PATCH] abbrev --- parse-input-graph | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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\""; } -- 2.30.2