img_tag(): For \n to be interpreted as a newline, the string must use double

freddrake · freddrake · commit a0e4b78233dd · 1998-08-14T15:03:48.000Z
quote, not single quotes.  Ugh.
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
@@ -193,7 +193,7 @@ sub img_tag {
 			,'" src="', $icon, '">' );
 	}
 	return join('', '<img ', $iconsizes{$1}, $align
-		    ,'border=', $nav_border, ' alt="', $alt, '"\n'
+		    ,'border=', $nav_border, ' alt="', $alt, "\"\n"
 		    ,' src="', $ICONSERVER, "/$icon", '">' );
     }
     else {

Original file line number	Diff line number	Diff line change
`@@ -193,7 +193,7 @@ sub img_tag {`
`193`	`193`	`,'" src="', $icon, '">' );`
`194`	`194`	`}`
`195`	`195`	`return join('', '<img ', $iconsizes{$1}, $align`
`196`		`- ,'border=', $nav_border, ' alt="', $alt, '"\n'`
	`196`	`+ ,'border=', $nav_border, ' alt="', $alt, "\"\n"`
`197`	`197`	`,' src="', $ICONSERVER, "/$icon", '">' );`
`198`	`198`	`}`
`199`	`199`	`else {`