From 17b159c4e46e77beb476ac63a57322adfeb159d6 Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Thu, 1 Nov 2007 03:57:27 +0000 Subject: [PATCH] (printing): Fix :version, printing.el was included for in emacs-22.1. (pr-path-style, pr-path-alist, pr-txt-name) (pr-txt-printer-alist, pr-ps-name, pr-ps-printer-alist) (pr-temp-dir, pr-ps-temp-file, pr-file-modes, pr-gv-command) (pr-gs-command, pr-gs-switches, pr-gs-device, pr-gs-resolution) (pr-print-using-ghostscript, pr-file-tumble, pr-auto-region) (pr-auto-mode, pr-mode-alist, pr-ps-utility) (pr-ps-utility-alist, pr-menu-char-height, pr-menu-char-width) (pr-setting-database, pr-visible-entry-list) (pr-delete-temp-file, pr-list-directory, pr-buffer-name) (pr-buffer-name-ignore, pr-buffer-verbose): Remove incorrect :version. --- lisp/ChangeLog | 16 ++++++++++++++++ lisp/printing.el | 37 +------------------------------------ 2 files changed, 17 insertions(+), 36 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 24334c9513a..37959364533 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,19 @@ +2007-11-01 Dan Nicolaescu + + * printing.el (printing): Fix :version, printing.el was included + in emacs-22.1. + (pr-path-style, pr-path-alist, pr-txt-name) + (pr-txt-printer-alist, pr-ps-name, pr-ps-printer-alist) + (pr-temp-dir, pr-ps-temp-file, pr-file-modes, pr-gv-command) + (pr-gs-command, pr-gs-switches, pr-gs-device, pr-gs-resolution) + (pr-print-using-ghostscript, pr-file-tumble, pr-auto-region) + (pr-auto-mode, pr-mode-alist, pr-ps-utility) + (pr-ps-utility-alist, pr-menu-char-height, pr-menu-char-width) + (pr-setting-database, pr-visible-entry-list) + (pr-delete-temp-file, pr-list-directory, pr-buffer-name) + (pr-buffer-name-ignore, pr-buffer-verbose): Remove incorrect + :version. + 2007-11-01 Glenn Morris * mail/footnote.el (footnote-numeric-regexp) diff --git a/lisp/printing.el b/lisp/printing.el index 412f0b342fc..f83509d085e 100644 --- a/lisp/printing.el +++ b/lisp/printing.el @@ -1176,7 +1176,7 @@ If SUFFIX is non-nil, add that at the end of the file name." :tag "Printing Utilities" :link '(emacs-library-link :tag "Source Lisp File" "printing.el") :prefix "pr-" - :version "20" + :version "22.1" :group 'wp :group 'postscript) @@ -1196,7 +1196,6 @@ Valid values are: :type '(choice :tag "Path style" (const :tag "Windows 9x/NT Style (\\)" :value windows) (const :tag "Unix Style (/)" :value unix)) - :version "20" :group 'printing) @@ -1308,7 +1307,6 @@ Examples: :tag "Directory" (string :value "") (symbol :value symbol))))) - :version "20" :group 'printing) @@ -1323,7 +1321,6 @@ modified by other means (for example, a lisp function), use `pr-update-menus' function (see it for documentation) to update text printer menu." :type 'symbol :set 'pr-txt-name-custom-set - :version "20" :group 'printing) @@ -1456,7 +1453,6 @@ Useful links: (const :tag "None" nil) string))) :set 'pr-alist-custom-set - :version "20" :group 'printing) @@ -1471,7 +1467,6 @@ modified by other means (for example, a lisp function), use `pr-update-menus' function (see it for documentation) to update PostScript printer menu." :type 'symbol :set 'pr-ps-name-custom-set - :version "20" :group 'printing) @@ -1744,7 +1739,6 @@ Useful links: (sexp :tag "Value"))) )) :set 'pr-alist-custom-set - :version "20" :group 'printing) @@ -1763,7 +1757,6 @@ Useful links: See also `pr-ps-temp-file' and `pr-file-modes'." :type '(directory :tag "Temporary Directory") - :version "20" :group 'printing) @@ -1772,7 +1765,6 @@ See also `pr-ps-temp-file' and `pr-file-modes'." See also `pr-temp-dir' and `pr-file-modes'." :type '(file :tag "PostScript Temporary File Name") - :version "21" :group 'printing) @@ -1786,7 +1778,6 @@ It should be an integer; only the low 9 bits are used. See also `pr-temp-dir' and `pr-ps-temp-file'." :type '(integer :tag "File Permission Bits") - :version "21.3" :group 'printing) @@ -1828,7 +1819,6 @@ Useful links: `http://www.cs.wisc.edu/~ghost/macos/index.htm' " :type '(string :tag "Ghostview Utility") - :version "20" :group 'printing) @@ -1855,7 +1845,6 @@ Useful links: `http://www.cs.wisc.edu/~ghost/doc/printer.htm' " :type '(string :tag "Ghostscript Utility") - :version "20" :group 'printing) @@ -1898,7 +1887,6 @@ Useful links: `http://www.cs.wisc.edu/~ghost/doc/printer.htm' " :type '(repeat (string :tag "Ghostscript Switch")) - :version "20" :group 'printing) @@ -1915,7 +1903,6 @@ A note on the gs switches: See `pr-gs-switches' for documentation. See also `pr-ps-printer-alist'." :type '(string :tag "Ghostscript Device") - :version "20" :group 'printing) @@ -1929,7 +1916,6 @@ A note on the gs switches: See `pr-gs-switches' for documentation. See also `pr-ps-printer-alist'." :type '(integer :tag "Ghostscript Resolution") - :version "20" :group 'printing) @@ -1942,35 +1928,30 @@ ghostscript to print a PostScript file. In GNU or Unix system, if ghostscript is set as a PostScript filter, this variable should be nil." :type 'boolean - :version "20" :group 'printing) (defcustom pr-faces-p nil "*Non-nil means print with face attributes." :type 'boolean - :version "20" :group 'printing) (defcustom pr-spool-p nil "*Non-nil means spool printing in a buffer." :type 'boolean - :version "20" :group 'printing) (defcustom pr-file-landscape nil "*Non-nil means print PostScript file in landscape orientation." :type 'boolean - :version "20" :group 'printing) (defcustom pr-file-duplex nil "*Non-nil means print PostScript file in duplex mode." :type 'boolean - :version "20" :group 'printing) @@ -1982,7 +1963,6 @@ right. If tumble is on, produces a printing suitable for binding at the top or bottom." :type 'boolean - :version "20" :group 'printing) @@ -1995,7 +1975,6 @@ When this variable is non-nil, the `*-buffer*' commands will behave like `*-region*' commands, that is, `*-buffer*' commands will print only the region marked instead of all buffer." :type 'boolean - :version "20" :group 'printing) @@ -2007,7 +1986,6 @@ and `*-region*' commands will behave like `*-mode*' commands; otherwise, `*-buffer*' commands will print the current buffer and `*-region*' commands will print the current region." :type 'boolean - :version "20" :group 'printing) @@ -2208,7 +2186,6 @@ DEFAULT It's a way to set default values when this entry is selected. (variable :tag "Other")) (sexp :tag "Value"))) )) - :version "20" :group 'printing) @@ -2226,7 +2203,6 @@ NOTE: Don't forget to download and install the utilities declared on `pr-ps-utility-alist'." :type '(symbol :tag "PS File Utility") :set 'pr-ps-utility-custom-set - :version "20" :group 'printing) @@ -2439,7 +2415,6 @@ Useful links: (sexp :tag "Value"))) )) :set 'pr-alist-custom-set - :version "20" :group 'printing) @@ -2448,7 +2423,6 @@ Useful links: See also `pr-menu-char-height' and `pr-menu-char-width'." :type 'boolean - :version "20" :group 'printing) @@ -2464,7 +2438,6 @@ menu, so don't forget to adjust it if menu position is not ok. See also `pr-menu-lock' and `pr-menu-char-width'." :type 'integer - :version "20" :group 'printing) @@ -2480,7 +2453,6 @@ menu, so don't forget to adjust it if menu position is not ok. See also `pr-menu-lock' and `pr-menu-char-height'." :type 'integer - :version "20" :group 'printing) @@ -2597,7 +2569,6 @@ SETTING It's a cons like: (variable :tag "Other")) (sexp :tag "Value"))) )) - :version "20" :group 'printing) @@ -2651,7 +2622,6 @@ Any other value is ignored." (const postscript-process) (const printing) (const help))) - :version "20" :group 'printing) @@ -2663,7 +2633,6 @@ happens when printing: Error: could not open \"c:\\temp\\prspool.ps\" for reading." :type 'boolean - :version "20" :group 'printing) @@ -2677,7 +2646,6 @@ It's used by `pr-ps-directory-preview', `pr-ps-directory-using-ghostscript', `pr-ps-directory-print', `pr-ps-directory-ps-print', `pr-printify-directory' and `pr-txt-directory'." :type 'boolean - :version "20" :group 'printing) @@ -2686,7 +2654,6 @@ and `pr-txt-directory'." It's used by `pr-interface'." :type 'string - :version "20" :group 'printing) @@ -2700,7 +2667,6 @@ NOTE: Case is important for matching, that is, `case-fold-search' is always It's used by `pr-interface'." :type '(repeat (regexp :tag "Buffer Name Regexp")) - :version "20" :group 'printing) @@ -2709,7 +2675,6 @@ It's used by `pr-interface'." It's used by `pr-interface'." :type 'boolean - :version "20" :group 'printing) -- 2.39.2