Mercurial > emacs

changeset 28764:a94b3ce0fa8c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Gerd Moellmann <gerd@gnu.org>
date Sat, 29 Apr 2000 19:35:00 +0000
parents 3305d83568ea
children bd9ee005f206
files etc/ChangeLog etc/ps-prin0.ps lisp/ChangeLog lisp/cus-load.el lisp/loaddefs.el
diffstat 5 files changed, 63 insertions(+), 21 deletions(-) [+]
line wrap: on
line diff
--- a/etc/ChangeLog	Sat Apr 29 19:34:45 2000 +0000
+++ b/etc/ChangeLog	Sat Apr 29 19:35:00 2000 +0000
@@ -1,3 +1,14 @@
+2000-04-29  Vinicius Jose Latorre  <vinicius@cpqd.com.br>
+
+	* ps-prin0.ps: PostScript level 1 compatibility.
+
+	* ps-prin1.ps: PostScript level 1 compatibility, Upside-down
+	printing and line number step.
+	(BeginDoc, doLineNumber, SL, HL): Code fix.
+	(isLineStep, PSL): New funs.
+
+	* ps-prin3.ps: PostScript level 1 compatibility.
+
 2000-04-10  Gerd Moellmann  <gerd@gnu.org>
 
 	* refcard.bit: Removed.
@@ -26,8 +37,8 @@
 
 2000-03-16  Vinicius Jose Latorre  <vinicius@cpqd.com.br>
 	
-	* ps-prin0.ps: Define packedarray operator for language level 1, adjust
-	setduplexmode and settumble definitions.
+	* ps-prin0.ps: Define packedarray operator for language level 1,
+	adjust setduplexmode and settumble definitions.
 	
 2000-03-15  Vinicius Jose Latorre  <vinicius@cpqd.com.br>
 
--- a/etc/ps-prin0.ps	Sat Apr 29 19:34:45 2000 +0000
+++ b/etc/ps-prin0.ps	Sat Apr 29 19:35:00 2000 +0000
@@ -100,12 +100,22 @@
 }ifelse
 %%EndProcSet
 
-languagelevel 1 eq{ % operators for language level 2 only
- /<<{mark}bind def
- />>{counttomark 2 idiv dup dict begin{def}repeat pop currentdict end}bind def
- /setpagedevice{pop}bind def
- /packedarray{array astore readonly}bind def
-}if
+
+% operators for language level 2 only
+
+(<<)cvn where			% << operator
+{pop/BMark(<<)cvn load def}
+{/BMark{mark}bind def}ifelse
+(>>)cvn where			% >> operator
+{pop/EMark(>>)cvn load def}
+{/EMark{counttomark 2 idiv dup dict begin{def}repeat pop currentdict end}bind def}ifelse
+/setpagedevice where		% setpagedevice
+{pop}
+{/setpagedevice{pop}bind def}ifelse
+/packedarray where		% packedarray
+{pop}
+{/packedarray{array astore readonly}bind def}ifelse
+
 
 % device dependent operators
 
--- a/lisp/ChangeLog	Sat Apr 29 19:34:45 2000 +0000
+++ b/lisp/ChangeLog	Sat Apr 29 19:35:00 2000 +0000
@@ -1,3 +1,22 @@
+2000-04-29  Gerd Moellmann  <gerd@gnu.org>
+
+	* startup.el (normal-top-level): Put a condition-case around
+	the code loading subdirs.el.
+
+2000-04-29  Vinicius Jose Latorre  <vinicius@cpqd.com.br>
+	
+	* ps-print.el: Upside-down and face background color printing,
+	line number step, doc fix.
+	(ps-print-version): New version number (5.2).
+	(ps-setup, ps-prologue-file, ps-begin-file, ps-begin-job)
+	(ps-face-attribute-list, ps-plot-with-face): Code fix.
+	(ps-spool-config): Var fix.
+	(ps-printer-name-option): Const fix.
+	(ps-print-upside-down, ps-use-face-background)
+	(ps-line-number-step): New vars.
+	(ps-window-system, ps-lp-system): New consts.
+	(ps-face-background): New fun.
+
 2000-04-28  Richard Stallman  <rms@gnu.org>
 
 	* files.el (make-auto-save-file-name):
--- a/lisp/cus-load.el	Sat Apr 29 19:34:45 2000 +0000
+++ b/lisp/cus-load.el	Sat Apr 29 19:35:00 2000 +0000
@@ -736,6 +736,8 @@
 (custom-put-if-not 'gametree 'group-documentation "Manage game analysis trees in Emacs.")
 (custom-put-if-not 'hscroll-global-mode 'custom-version "20.3")
 (custom-put-if-not 'hscroll-global-mode 'standard-value t)
+(custom-put-if-not 'auto-save-file-name-transforms 'custom-version "21.1")
+(custom-put-if-not 'auto-save-file-name-transforms 'standard-value t)
 (custom-put-if-not 'tags-apropos-verbose 'custom-version "21.1")
 (custom-put-if-not 'tags-apropos-verbose 'standard-value t)
 (custom-put-if-not 'dabbrev-ignored-regexps 'custom-version "21.1")
@@ -757,7 +759,7 @@
 (custom-put-if-not 'eval-expression-print-level 'custom-version "21.1")
 (custom-put-if-not 'eval-expression-print-level 'standard-value t)
 
-(defvar custom-versions-load-alist '(("20.3.3" "dos-vars") (21.1 "ange-ftp") ("20.4" "files" "sh-script" "help" "compile") ("21.1" "debug" "dabbrev" "paths" "sgml-mode" "fortran" "etags" "cus-edit" "frame" "add-log" "find-func" "simple") ("20.3" "desktop" "easymenu" "hscroll" "dabbrev" "ffap" "rmail" "paren" "mailabbrev" "frame" "uce" "mouse" "diary-lib" "sendmail" "debug" "hexl" "vcursor" "vc" "compile" "etags" "help" "browse-url" "add-log" "find-func" "vc-hooks" "cus-edit" "replace"))
+(defvar custom-versions-load-alist '(("20.3.3" "dos-vars") (21.1 "ange-ftp") ("20.4" "files" "sh-script" "help" "compile") ("21.1" "debug" "dabbrev" "files" "paths" "sgml-mode" "fortran" "etags" "cus-edit" "frame" "add-log" "find-func" "simple") ("20.3" "desktop" "easymenu" "hscroll" "dabbrev" "ffap" "rmail" "paren" "mailabbrev" "frame" "uce" "mouse" "diary-lib" "sendmail" "debug" "hexl" "vcursor" "vc" "compile" "etags" "help" "browse-url" "add-log" "find-func" "vc-hooks" "cus-edit" "replace"))
  "For internal use by custom.")
 
 (provide 'cus-load)
--- a/lisp/loaddefs.el	Sat Apr 29 19:34:45 2000 +0000
+++ b/lisp/loaddefs.el	Sat Apr 29 19:35:00 2000 +0000
@@ -3336,7 +3336,7 @@
 ;;;***
 
 ;;;### (autoloads (completing-read-multiple) "crm" "emacs-lisp/crm.el"
-;;;;;;  (14597 38419))
+;;;;;;  (14600 8203))
 ;;; Generated autoloads from emacs-lisp/crm.el
 
 (autoload (quote completing-read-multiple) "crm" "\
@@ -3377,7 +3377,7 @@
 ;;;;;;  customize-option-other-window customize-changed-options customize-option
 ;;;;;;  customize-group-other-window customize-group customize customize-save-variable
 ;;;;;;  customize-set-variable customize-set-value) "cus-edit" "cus-edit.el"
-;;;;;;  (14587 2634))
+;;;;;;  (14599 11147))
 ;;; Generated autoloads from cus-edit.el
  (add-hook 'same-window-regexps "\\`\\*Customiz.*\\*\\'")
 
@@ -4110,7 +4110,7 @@
 ;;;;;;  dired dired-copy-preserve-time dired-dwim-target dired-keep-marker-symlink
 ;;;;;;  dired-keep-marker-hardlink dired-keep-marker-copy dired-keep-marker-rename
 ;;;;;;  dired-trivial-filenames dired-ls-F-marks-symlinks dired-listing-switches)
-;;;;;;  "dired" "dired.el" (14563 8348))
+;;;;;;  "dired" "dired.el" (14600 27076))
 ;;; Generated autoloads from dired.el
 
 (defvar dired-listing-switches "-al" "\
@@ -5534,8 +5534,8 @@
 ;;;;;;  pop-tag-mark find-tag-regexp find-tag-other-frame find-tag-other-window
 ;;;;;;  find-tag find-tag-noselect tags-table-files visit-tags-table
 ;;;;;;  find-tag-default-function find-tag-hook tags-add-tables tags-table-list
-;;;;;;  tags-case-fold-search) "etags" "progmodes/etags.el" (14597
-;;;;;;  60154))
+;;;;;;  tags-case-fold-search) "etags" "progmodes/etags.el" (14600
+;;;;;;  21015))
 ;;; Generated autoloads from progmodes/etags.el
 
 (defvar tags-file-name nil "\
@@ -7310,7 +7310,7 @@
 ;;;***
 
 ;;;### (autoloads (jdb pdb perldb xdb dbx sdb gdb) "gud" "gud.el"
-;;;;;;  (14587 2634))
+;;;;;;  (14599 26515))
 ;;; Generated autoloads from gud.el
 
 (autoload (quote gdb) "gud" "\
@@ -9883,7 +9883,7 @@
 ;;;***
 
 ;;;### (autoloads (mh-letter-mode mh-smail-other-window mh-smail-batch
-;;;;;;  mh-smail) "mh-comp" "mail/mh-comp.el" (14460 38678))
+;;;;;;  mh-smail) "mh-comp" "mail/mh-comp.el" (14600 36202))
 ;;; Generated autoloads from mail/mh-comp.el
 
 (autoload (quote mh-smail) "mh-comp" "\
@@ -11239,7 +11239,7 @@
 ;;;;;;  ps-spool-region ps-spool-buffer-with-faces ps-spool-buffer
 ;;;;;;  ps-print-region-with-faces ps-print-region ps-print-buffer-with-faces
 ;;;;;;  ps-print-buffer ps-print-customize ps-paper-type) "ps-print"
-;;;;;;  "ps-print.el" (14584 21532))
+;;;;;;  "ps-print.el" (14602 58229))
 ;;; Generated autoloads from ps-print.el
 
 (defvar ps-paper-type (quote letter) "\
@@ -11978,8 +11978,8 @@
 ;;;;;;  rmail-secondary-file-directory rmail-mail-new-frame rmail-primary-inbox-list
 ;;;;;;  rmail-delete-after-output rmail-highlight-face rmail-highlighted-headers
 ;;;;;;  rmail-retry-ignored-headers rmail-displayed-headers rmail-ignored-headers
-;;;;;;  rmail-dont-reply-to-names) "rmail" "mail/rmail.el" (14555
-;;;;;;  23001))
+;;;;;;  rmail-dont-reply-to-names) "rmail" "mail/rmail.el" (14599
+;;;;;;  11221))
 ;;; Generated autoloads from mail/rmail.el
 
 (defvar rmail-dont-reply-to-names nil "\
@@ -14088,7 +14088,7 @@
 ;;;***
 
 ;;;### (autoloads (texi2info texinfo-format-region texinfo-format-buffer)
-;;;;;;  "texinfmt" "textmodes/texinfmt.el" (14456 53455))
+;;;;;;  "texinfmt" "textmodes/texinfmt.el" (14600 18796))
 ;;; Generated autoloads from textmodes/texinfmt.el
 
 (autoload (quote texinfo-format-buffer) "texinfmt" "\
@@ -14413,7 +14413,7 @@
 ;;;***
 
 ;;;### (autoloads (time-stamp-toggle-active time-stamp) "time-stamp"
-;;;;;;  "time-stamp.el" (14277 60981))
+;;;;;;  "time-stamp.el" (14599 11147))
 ;;; Generated autoloads from time-stamp.el
 
 (autoload (quote time-stamp) "time-stamp" "\