Mercurial > emacs
comparison lisp/ps-print.el @ 111091:a5d92e87313c
Support for systems without floats was removed a decade ago.
* lisp/loadup.el: Unconditionally load float-sup.
* lisp/paren.el (show-paren-delay):
* lisp/emacs-lisp/float-sup.el:
* lisp/emulation/cua-base.el (cua-prefix-override-inhibit-delay):
* lisp/obsolete/lazy-lock.el (lazy-lock-defer-time, lazy-lock-stealth-nice)
(lazy-lock-stealth-verbose): Assume float support.
* lisp/ps-print.el: Assume float support on Emacs.
* lisp/emacs-lisp/timer.el (timer-next-integral-multiple-of-time):
Remove non-float branch.
* lisp/obsolete/lazy-lock.el: Remove leading `*' from defcustom docs.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Thu, 21 Oct 2010 21:03:55 -0700 |
parents | b8fde5ef9e14 |
children | c00190a8c8ef |
comparison
equal
deleted
inserted
replaced
111090:d1c6f23c3e92 | 111091:a5d92e87313c |
---|---|
1464 | 1464 |
1465 | 1465 |
1466 (require 'lpr) | 1466 (require 'lpr) |
1467 | 1467 |
1468 | 1468 |
1469 (or (featurep 'lisp-float-type) | |
1470 (error "`ps-print' requires floating point support")) | |
1471 | |
1472 | |
1473 (if (featurep 'xemacs) | 1469 (if (featurep 'xemacs) |
1474 () | 1470 (or (featurep 'lisp-float-type) |
1471 (error "`ps-print' requires floating point support")) | |
1475 (unless (and (boundp 'emacs-major-version) | 1472 (unless (and (boundp 'emacs-major-version) |
1476 (>= emacs-major-version 23)) | 1473 (>= emacs-major-version 23)) |
1477 (error "`ps-print' only supports Emacs 23 and higher"))) | 1474 (error "`ps-print' only supports Emacs 23 and higher"))) |
1478 | 1475 |
1479 | 1476 |
6724 | 6721 |
6725 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 6722 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
6726 | 6723 |
6727 (provide 'ps-print) | 6724 (provide 'ps-print) |
6728 | 6725 |
6729 ;; arch-tag: fb06a585-1112-4206-885d-a57d95d50579 | |
6730 ;;; ps-print.el ends here | 6726 ;;; ps-print.el ends here |