]> git.eshelyaron.com Git - emacs.git/commitdiff
*** empty log message ***
authorGerd Moellmann <gerd@gnu.org>
Sat, 29 Apr 2000 19:35:00 +0000 (19:35 +0000)
committerGerd Moellmann <gerd@gnu.org>
Sat, 29 Apr 2000 19:35:00 +0000 (19:35 +0000)
etc/ChangeLog
etc/ps-prin0.ps
lisp/ChangeLog
lisp/cus-load.el
lisp/loaddefs.el

index de0f400e206935caa1e0c51e1a8667b9f68d9734..e01e8518e9d2fda09f0eb612d46a7cc501dccdc9 100644 (file)
@@ -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>
 
index 41f1a7f96737a6b694445d0fb48de9766852fb88..a302eab39a5b4ffab423d430bd92112f1ff05663 100644 (file)
 }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
 
index 0253ec2d6705165d01d23afaa4045edee30e7289..8b8bb650ef22e6c73a89b7ac9bc509cb8d715cd3 100644 (file)
@@ -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):
index b3b04240af2c101d846723de523c7f89fa35e687..583c764df07f81f3bfdef7ae7c28839c47957b6d 100644 (file)
 (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")
 (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)
index fa85c1b56b94466780783b2caa3413e92cfaffd6..52830f55a37d5ef7af9ae51065e288852f1f236e 100644 (file)
@@ -3336,7 +3336,7 @@ With ARG, turn CRiSP mode on if ARG is positive, off otherwise." t nil)
 ;;;***
 \f
 ;;;### (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 @@ INHERIT-INPUT-METHOD." nil nil)
 ;;;;;;  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 @@ Minor mode for viewing/editing context diffs.
 ;;;;;;  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 @@ This function works by modifying `process-environment'." t nil)
 ;;;;;;  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 @@ the form \"WINDOW-ID PIXMAP-ID\".  Value is non-nil if successful." nil nil)
 ;;;***
 \f
 ;;;### (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 @@ redisplayed as output is inserted." t nil)
 ;;;***
 \f
 ;;;### (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 @@ This checks if all multi-byte characters in the region are printable or not." ni
 ;;;;;;  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 @@ variable." t nil)
 ;;;;;;  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 @@ Entering SliTeX mode runs the hook `text-mode-hook', then the hook
 ;;;***
 \f
 ;;;### (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 @@ This runs the normal hook `display-time-hook' after each update." t nil)
 ;;;***
 \f
 ;;;### (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" "\