(ps-header-footer-string): Return a list of header

and footer strings.

1 files changed, 1 insertions, 3 deletions

diff --git a/lisp/ps-print.el b/lisp/ps-print.el
index 214a19560a4..d8c8f1f6ded 100644
--- a/lisp/ps-print.el
+++ b/lisp/ps-print.el
@@ -4855,9 +4855,7 @@ page-height == ((floor print-height ((th + ls) * zh)) * ((th + ls) * zh)) - th
   (and ps-print-footer
        (setq ps-lf-cache (ps-generate-string-list ps-left-footer)
              ps-rf-cache (ps-generate-string-list ps-right-footer)))
-  (mapconcat 'identity
-             (append ps-lh-cache ps-rh-cache ps-lf-cache ps-rf-cache)
-             ""))
+  (append ps-lh-cache ps-rh-cache ps-lf-cache ps-rf-cache))
 
 ;; These functions insert the arrays that define the contents of the headers.