summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2013-02-21 20:32:45 -0500
committerGlenn Morris <rgm@gnu.org>2013-02-21 20:32:45 -0500
commit153dd4d04f0bb5e315cb1911db1c05c6a3d976df (patch)
tree9cf8f45fb4c5984d333fdc5bea48e1c5f6d09782 /lisp
parentb59a2e9edb562fce9c63a73242db323cd4a9dc0f (diff)
downloademacs-153dd4d04f0bb5e315cb1911db1c05c6a3d976df.tar.gz
* lisp/htmlfontify.el (hfy-default-header): Encode title string. (Bug#7457)
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/htmlfontify.el2
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 68cff2f6d29..7f65619dcfa 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-02-22 Glenn Morris <rgm@gnu.org>
+
+ * htmlfontify.el (hfy-default-header): Encode title string. (Bug#7457)
+
2013-02-21 Bastien Guerry <bzg@gnu.org>
* cmuscheme.el (scheme-buffer): Fix docstring. (Bug#13778)
diff --git a/lisp/htmlfontify.el b/lisp/htmlfontify.el
index df8ef86a3cd..768dda993e2 100644
--- a/lisp/htmlfontify.el
+++ b/lisp/htmlfontify.el
@@ -717,7 +717,7 @@ STYLE is the inline CSS stylesheet (or tag referring to an external sheet)."
--> </script>
</head>
<body onload=\"stripe('index'); return true;\">\n"
- file style))
+ (mapconcat 'hfy-html-quote (mapcar 'char-to-string file) "") style))
(defun hfy-default-footer (_file)
"Default value for `hfy-page-footer'.