procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
emacs/lisp/obsolete/ps-def.el

55 lines
1.7 KiB
EmacsLisp
Raw Normal View History

Remove XEmacs compat code from ps-print * lisp/ps-print.el: (ps-print-color-p, ps-postscript-code-directory, ps-setup): * lisp/ps-def.el: (ps-mark-active-p, ps-face-foreground-name) (ps-face-background-name, ps-color-device, ps-color-values) (ps-face-bold-p, ps-face-italic-p, ps-face-strikeout-p) (ps-face-overline-p, ps-face-box-p) (ps-generate-postscript-with-faces1): Remove XEmacs compat code and some outdated Emacs compat code.
2019-06-19 22:30:10 +02:00
;;; ps-def.el --- Emacs definitions for ps-print -*- lexical-binding: t -*-
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
; Add 2022 to copyright years.
2022-01-01 02:45:51 -05:00
;; Copyright (C) 2007-2022 Free Software Foundation, Inc.
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
Email replacement.
2017-10-29 20:28:58 -02:00
;; Author: Vinicius Jose Latorre <viniciusjl.gnu@gmail.com>
Fixes for "Maintainer:" and related lines Mostly, this just removes "Maintainer: emacs-devel@gnu.org" lines, which are not that useful. It also cleans up and regularizes a few similar lines.
2019-05-19 21:29:13 -07:00
;; Kenichi Handa <handa@gnu.org> (multi-byte characters)
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
;; Keywords: wp, print, PostScript
; Normalize some header comments
2021-09-16 15:35:10 +02:00
;; URL: https://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre
Add "Package:" file headers to denote built-in packages.
2010-08-29 12:17:13 -04:00
;; Package: ps-print
Make ps-def.el obsolete (part 2/2) * lisp/obsolete/ps-def.el: Add "Obsolete-since". * lisp/ps-print.el (ps-def): Don't require.
2022-07-31 18:19:06 +02:00
;; Obsolete-since: 29.1
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
;; This file is part of GNU Emacs.
Switch to recommended form of GPLv3 permissions notice.
2008-05-06 08:06:51 +00:00
;; GNU Emacs is free software: you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
;; GNU Emacs is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
Prefer HTTPS to FTP and HTTP in documentation Most of this change is to boilerplate commentary such as license URLs. This change was prompted by ftp://ftp.gnu.org's going-away party, planned for November. Change these FTP URLs to https://ftp.gnu.org instead. Make similar changes for URLs to other organizations moving away from FTP. Also, change HTTP to HTTPS for URLs to gnu.org and fsf.org when this works, as this will further help defend against man-in-the-middle attacks (for this part I omitted the MS-DOS and MS-Windows sources and the test tarballs to keep the workload down). HTTPS is not fully working to lists.gnu.org so I left those URLs alone for now.
2017-09-13 15:52:52 -07:00
;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
;;; Commentary:
;; See ps-print.el for documentation.
;;; Code:
;; Emacs Definitions
Remove XEmacs compat code from ps-print * lisp/ps-print.el: (ps-print-color-p, ps-postscript-code-directory, ps-setup): * lisp/ps-def.el: (ps-mark-active-p, ps-face-foreground-name) (ps-face-background-name, ps-color-device, ps-color-values) (ps-face-bold-p, ps-face-italic-p, ps-face-strikeout-p) (ps-face-overline-p, ps-face-box-p) (ps-generate-postscript-with-faces1): Remove XEmacs compat code and some outdated Emacs compat code.
2019-06-19 22:30:10 +02:00
(defun ps-mark-active-p ()
Remove some leftover compat code from ps-print * lisp/ps-def.el (ps-mark-active-p): Make obsolete in favor of 'mark-active'. Update callers. (ps-face-foreground-name): Make obsolete in favor of 'face-foreground'. Update callers. (ps-face-background-name): Make obsolete in favor of 'face-background'. Update callers. (ps-color-device): Make into obsolete function alias for 'display-color-p'. Update callers.
2022-07-31 13:15:22 +02:00
(declare (obsolete mark-active "29.1"))
Remove XEmacs compat code from ps-print * lisp/ps-print.el: (ps-print-color-p, ps-postscript-code-directory, ps-setup): * lisp/ps-def.el: (ps-mark-active-p, ps-face-foreground-name) (ps-face-background-name, ps-color-device, ps-color-values) (ps-face-bold-p, ps-face-italic-p, ps-face-strikeout-p) (ps-face-overline-p, ps-face-box-p) (ps-generate-postscript-with-faces1): Remove XEmacs compat code and some outdated Emacs compat code.
2019-06-19 22:30:10 +02:00
mark-active)
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
Remove XEmacs compat code from ps-print * lisp/ps-print.el: (ps-print-color-p, ps-postscript-code-directory, ps-setup): * lisp/ps-def.el: (ps-mark-active-p, ps-face-foreground-name) (ps-face-background-name, ps-color-device, ps-color-values) (ps-face-bold-p, ps-face-italic-p, ps-face-strikeout-p) (ps-face-overline-p, ps-face-box-p) (ps-generate-postscript-with-faces1): Remove XEmacs compat code and some outdated Emacs compat code.
2019-06-19 22:30:10 +02:00
(defun ps-face-foreground-name (face)
Remove some leftover compat code from ps-print * lisp/ps-def.el (ps-mark-active-p): Make obsolete in favor of 'mark-active'. Update callers. (ps-face-foreground-name): Make obsolete in favor of 'face-foreground'. Update callers. (ps-face-background-name): Make obsolete in favor of 'face-background'. Update callers. (ps-color-device): Make into obsolete function alias for 'display-color-p'. Update callers.
2022-07-31 13:15:22 +02:00
(declare (obsolete face-foreground "29.1"))
Remove XEmacs compat code from ps-print * lisp/ps-print.el: (ps-print-color-p, ps-postscript-code-directory, ps-setup): * lisp/ps-def.el: (ps-mark-active-p, ps-face-foreground-name) (ps-face-background-name, ps-color-device, ps-color-values) (ps-face-bold-p, ps-face-italic-p, ps-face-strikeout-p) (ps-face-overline-p, ps-face-box-p) (ps-generate-postscript-with-faces1): Remove XEmacs compat code and some outdated Emacs compat code.
2019-06-19 22:30:10 +02:00
(face-foreground face nil t))
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
Remove XEmacs compat code from ps-print * lisp/ps-print.el: (ps-print-color-p, ps-postscript-code-directory, ps-setup): * lisp/ps-def.el: (ps-mark-active-p, ps-face-foreground-name) (ps-face-background-name, ps-color-device, ps-color-values) (ps-face-bold-p, ps-face-italic-p, ps-face-strikeout-p) (ps-face-overline-p, ps-face-box-p) (ps-generate-postscript-with-faces1): Remove XEmacs compat code and some outdated Emacs compat code.
2019-06-19 22:30:10 +02:00
(defun ps-face-background-name (face)
Remove some leftover compat code from ps-print * lisp/ps-def.el (ps-mark-active-p): Make obsolete in favor of 'mark-active'. Update callers. (ps-face-foreground-name): Make obsolete in favor of 'face-foreground'. Update callers. (ps-face-background-name): Make obsolete in favor of 'face-background'. Update callers. (ps-color-device): Make into obsolete function alias for 'display-color-p'. Update callers.
2022-07-31 13:15:22 +02:00
(declare (obsolete face-background "29.1"))
Remove XEmacs compat code from ps-print * lisp/ps-print.el: (ps-print-color-p, ps-postscript-code-directory, ps-setup): * lisp/ps-def.el: (ps-mark-active-p, ps-face-foreground-name) (ps-face-background-name, ps-color-device, ps-color-values) (ps-face-bold-p, ps-face-italic-p, ps-face-strikeout-p) (ps-face-overline-p, ps-face-box-p) (ps-generate-postscript-with-faces1): Remove XEmacs compat code and some outdated Emacs compat code.
2019-06-19 22:30:10 +02:00
(face-background face nil t))
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
Minor cleanup in ps-def.el * lisp/ps-def.el (ps-frame-parameter): Make alias obsolete. * lisp/ps-print.el (ps-begin-job): Adjust caller.
2020-08-12 15:34:13 +02:00
(define-obsolete-function-alias 'ps-frame-parameter #'frame-parameter "28.1")
Remove some leftover compat code from ps-print * lisp/ps-def.el (ps-mark-active-p): Make obsolete in favor of 'mark-active'. Update callers. (ps-face-foreground-name): Make obsolete in favor of 'face-foreground'. Update callers. (ps-face-background-name): Make obsolete in favor of 'face-background'. Update callers. (ps-color-device): Make into obsolete function alias for 'display-color-p'. Update callers.
2022-07-31 13:15:22 +02:00
(define-obsolete-function-alias 'ps-color-device #'display-color-p "29.1")
Remove some compat code from ps files * lisp/ps-def.el (ps-color-device): Ditto. * lisp/ps-print.el (ps-color-scale): Make into an obsolete alias. (ps-begin-job): Adjust caller. * lisp/progmodes/ebnf2ps.el (ebnf-generate-eps, ebnf-generate): Ditto.
2020-08-18 23:09:53 +02:00
(define-obsolete-function-alias 'ps-color-values #'color-values "28.1")
Split XEmacs/Emacs definitions and sample setup code into separate files
2007-01-26 02:30:28 +00:00
(provide 'ps-def)
;;; ps-def.el ends here
Reference in a new issue Copy permalink