Mercurial > emacs
changeset 91077:74fda5245f7e
Eliminate the check if ps-print was running on Lucid or Epoch emacsen
| author | Vinicius Jose Latorre <viniciusjl@ig.com.br> |
|---|---|
| date | Thu, 01 Nov 2007 01:54:48 +0000 |
| parents | b55268b337cd |
| children | 2a54f2cb1b4b |
| files | lisp/ChangeLog lisp/ps-print.el |
| diffstat | 2 files changed, 10 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Oct 29 23:31:22 2007 +0000 +++ b/lisp/ChangeLog Thu Nov 01 01:54:48 2007 +0000 @@ -1,3 +1,8 @@ +2007-10-31 Vinicius Jose Latorre <viniciusjl@ig.com.br> + + * ps-print.el: Eliminate the check if ps-print was running on Lucid or + Epoch emacsen. + 2007-10-27 Vinicius Jose Latorre <viniciusjl@ig.com.br> * ps-print.el: Now detect if text foreground and background colors are
--- a/lisp/ps-print.el Mon Oct 29 23:31:22 2007 +0000 +++ b/lisp/ps-print.el Thu Nov 01 01:54:48 2007 +0000 @@ -1464,16 +1464,11 @@ (error "`ps-print' requires floating point support")) -(let ((case-fold-search t)) - (cond ((featurep 'xemacs)) - ((string-match "Lucid" emacs-version) - (error "`ps-print' doesn't support Lucid")) - ((string-match "Epoch" emacs-version) - (error "`ps-print' doesn't support Epoch")) - (t - (unless (and (boundp 'emacs-major-version) - (>= emacs-major-version 23)) - (error "`ps-print' only supports Emacs 23 and higher"))))) +(if (featurep 'xemacs) + () + (unless (and (boundp 'emacs-major-version) + (>= emacs-major-version 23)) + (error "`ps-print' only supports Emacs 23 and higher"))) (defconst ps-windows-system