# HG changeset patch # User Vinicius Jose Latorre # Date 1164747622 0 # Node ID d108d1785ea7cb7748ba521507ff610a1957d331 # Parent 1609d170cf69dac44eb40107ed43ad42760619d2 New version diff -r 1609d170cf69 -r d108d1785ea7 lisp/ChangeLog.unicode --- a/lisp/ChangeLog.unicode Tue Nov 28 05:34:46 2006 +0000 +++ b/lisp/ChangeLog.unicode Tue Nov 28 21:00:22 2006 +0000 @@ -1,3 +1,9 @@ +2006-11-28 Vinicius Jose Latorre + + * ps-print.el: Fix maintainer email. Eliminate function declaration + that kept compatibility with older Emacs version. + (ps-print-version): New version (6.7). + 2006-11-28 Kenichi Handa * international/quail.el (quail-get-translations): Make diff -r 1609d170cf69 -r d108d1785ea7 lisp/ps-print.el --- a/lisp/ps-print.el Tue Nov 28 05:34:46 2006 +0000 +++ b/lisp/ps-print.el Tue Nov 28 21:00:22 2006 +0000 @@ -6,16 +6,16 @@ ;; Author: Jim Thompson (was ) ;; Jacques Duthen (was ) ;; Vinicius Jose Latorre -;; Kenichi Handa (multi-byte characters) -;; Maintainer: Kenichi Handa (multi-byte characters) +;; Kenichi Handa (multi-byte characters) +;; Maintainer: Kenichi Handa (multi-byte characters) ;; Vinicius Jose Latorre ;; Keywords: wp, print, PostScript -;; Time-stamp: <2005/06/27 00:57:22 vinicius> -;; Version: 6.6.7 +;; Time-stamp: <2006/11/28 18:27:15 vinicius> +;; Version: 6.7 ;; X-URL: http://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre -(defconst ps-print-version "6.6.7" - "ps-print.el, v 6.6.7 <2005/06/27 vinicius> +(defconst ps-print-version "6.7" + "ps-print.el, v 6.7 <2006/11/28 vinicius> Vinicius's last change version -- this file may have been edited as part of Emacs without changes to the version number. When reporting bugs, please also @@ -1459,31 +1459,11 @@ (error "`ps-print' doesn't support Epoch")) (t (unless (and (boundp 'emacs-major-version) - (> emacs-major-version 19)) - (error "`ps-print' only supports Emacs 20 and higher")) + (> emacs-major-version 22)) + (error "`ps-print' only supports Emacs 23 and higher")) 'emacs)))) -;; For Emacs 20.2 and the earlier version. - -(or (fboundp 'set-buffer-multibyte) - (defun set-buffer-multibyte (arg) - (setq enable-multibyte-characters arg))) - -(or (fboundp 'string-as-unibyte) - (defun string-as-unibyte (arg) arg)) - -(or (fboundp 'string-as-multibyte) - (defun string-as-multibyte (arg) arg)) - -(or (fboundp 'char-charset) - (defun char-charset (arg) 'ascii)) - -(or (fboundp 'charset-after) - (defun charset-after (&optional arg) - (char-charset (char-after arg)))) - - ;; GNU Emacs (or (fboundp 'line-beginning-position) (defun line-beginning-position (&optional n) @@ -1545,7 +1525,7 @@ (defun ps-face-background-name (face) (ps-xemacs-color-name (face-background face))) ) - (t ; emacs + (t ; emacs 23 or higher (defvar mark-active nil) (defun ps-mark-active-p () mark-active)