Update copyright year to 2015

[gnu-emacs] / lisp / play / handwrite.el

diff --git a/lisp/play/handwrite.el b/lisp/play/handwrite.el
index e2aec709b99f1d3975248eba36cee2c80463210c..32ea66307173e8ce1005ddc4d232ee81d3be0b85 100644 (file)
--- a/lisp/play/handwrite.el
+++ b/lisp/play/handwrite.el
@@ -1,6 +1,6 @@
-;;; handwrite.el --- turns your emacs buffer into a handwritten document -*- coding: iso-latin-1; -*-
+;;; handwrite.el --- turns your emacs buffer into a handwritten document -*- coding: utf-8; -*-
 
-;; Copyright (C) 1996, 2001-2012  Free Software Foundation, Inc.
+;; Copyright (C) 1996, 2001-2015 Free Software Foundation, Inc.
 
 ;; Author: Danny Roozendaal (was: <danny@tvs.kun.nl>)
 ;; Created: October 21 1996
@@ -45,7 +45,7 @@
 ;;  Installation
 ;;
 ;; type at your prompt "emacs -l handwrite.el" or put this file on your
-;; Emacs-Lisp load path,  add the following into your ~/.emacs startup file
+;; Emacs-Lisp load path, add the following into your init file:
 ;;
 ;;                (require 'handwrite)
 ;;
@@ -170,15 +170,15 @@ Variables: `handwrite-linespace'     (default 12)
        (textp)
        (ps-buf-name)                   ;name of the PostScript buffer
        (trans-table
-       '(("ÿ" . "264") ("á" . "207") ("à" . "210") ("â" . "211")
-         ("ä" . "212") ("ã" . "213") ("å" . "214") ("é" . "216")
-         ("è" . "217") ("ê" . "220") ("ë" . "221") ("í" . "222")
-         ("ì" . "223") ("î" . "224") ("ï" . "225") ("ó" . "227")
-         ("ò" . "230") ("ô" . "231") ("ö" . "232") ("õ" . "233")
-         ("ú" . "234") ("ù" . "235") ("û" . "236") ("ü" . "237")
-         ("ß" . "247") ("°" . "241") ("®" . "250") ("©" . "251")
-         ("ij" . "264") ("ç" . "215") ("§" . "244") ("ñ" . "226")
-         ("£" . "243")))
+       '(("ÿ" . "264") ("á" . "207") ("à" . "210") ("â" . "211")
+         ("ä" . "212") ("ã" . "213") ("å" . "214") ("é" . "216")
+         ("è" . "217") ("ê" . "220") ("ë" . "221") ("í" . "222")
+         ("ì" . "223") ("î" . "224") ("ï" . "225") ("ó" . "227")
+         ("ò" . "230") ("ô" . "231") ("ö" . "232") ("õ" . "233")
+         ("ú" . "234") ("ù" . "235") ("û" . "236") ("ü" . "237")
+         ("Ã\9f" . "247") ("°" . "241") ("®" . "250") ("©" . "251")
+         ("ij" . "264") ("ç" . "215") ("§" . "244") ("ñ" . "226")
+         ("£" . "243")))
        (escape-table '("\\\\" "(" ")")) ; \\ comes first to not work
                                        ; on inserted backslashes
        line)
@@ -189,7 +189,7 @@ Variables: `handwrite-linespace'     (default 12)
     (setq next-line-add-newlines t)
     (switch-to-buffer ps-buf-name)
     (handwrite-insert-header buf-name)
-    (insert "%%Creator: GNU Emacs' handwrite version " emacs-version  "\n")
+    (insert "%%Creator: GNU Emacs's handwrite version " emacs-version  "\n")
     (handwrite-insert-preamble)
     (handwrite-insert-info)
     (handwrite-insert-font)
@@ -244,7 +244,7 @@ Variables: `handwrite-linespace'     (default 12)
     (insert "showpage exec Hwsave restore\n\n")
     (insert "%%Pages " (number-to-string ipage) " 0\n")
     (insert "%%EOF\n")
-    ;;To avoid cumbersome code we simply ignore pagefeeds
+    ;;To avoid cumbersome code we simply ignore formfeeds
     (goto-char textp)
     (while (search-forward "\f" nil t)
       (replace-match "" nil t) )