Otherwise quote marks appear as funny characters.
use warnings;
use File::Spec;
-use HTML::Entities;
+use HTML::Entities qw();
use URI::Escape;
+sub encode_entities {
+ return HTML::Entities::encode_entities($_[0], "<&>'\"");
+}
+
my $gitweb_url = 'http://benpfaff.org/cgi-bin/gitweb.cgi?p=pspp;a=blob;f=[FILE];hb=[BRANCH]#l[LINE]';
open (LOG, '<', "LOG");
print LOG_HTML <<EOF;
<html>
<head>
+ <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<link rel="stylesheet" href="build.css">
</head>
<body>
projects / pspp / commitdiff