diff -ur v1.5d/bin/injector v1.5-patches/bin/injector
--- v1.5d/bin/injector	Thu Jan 13 01:29:17 2000
+++ v1.5-patches/bin/injector	Fri Aug 31 21:57:12 2001
@@ -57,11 +57,11 @@
 my %content = ();
 for (split /\n\s*\n/) {
   next unless $_;
-  my ($char, $content) = split /\n/, $_, 2;
+  my ($char, $content) = split /\n/, "$_\n", 2;
   # put comments aside for now, put them back later
   $content =~ 
     s/(^|[^\\])((?:\\\\)*)(%.*?(?:\n|\Z))/$1$2\n%DISPLACED COMMENT:$3/gmx;
-  $content{$char} = "$content\n";
+  $content{$char} = $content;
 }
 
 my $pattern = <<'EOP';