From f3b7f8c68e6fe58aad1d093b4efc4eb665ff2788 Mon Sep 17 00:00:00 2001
From: "B. Watson" <yalhcru@gmail.com>
Date: Fri, 26 Feb 2016 01:44:36 -0500
Subject: farting with comments in the dictionary stuff

---
 messages.pl | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'messages.pl')

diff --git a/messages.pl b/messages.pl
index fe94a35..0d68f4d 100644
--- a/messages.pl
+++ b/messages.pl
@@ -35,10 +35,10 @@ while(<DATA>) {
 	s/^\w+\s+//;
 
 	my $orig = $_;
+	#warn "msg: $_\n";
 	s/"//g;
 	s/\\r//g;
 	s/\\n/\n/g;
-	#warn "msg: $_\n";
 
 	$total_in += (1 + length);
 
@@ -49,7 +49,9 @@ while(<DATA>) {
 		}
 	}
 
-	#warn "'$_'\n" if $label eq 'do_you_want';
+	my $w = $_;
+	$w =~ s/\n/\\n/g;
+	#warn "got: \"$w\"\n";
 	open my $out, ">msg.out" or die $!;
 	print $out $_;
 	close $out;
-- 
cgit v1.2.3