在Emacs中的打印配置之间切换



emacs中的默认打印是用一些边距打印一页。我有此功能将边距更改为每张纸的两个页面"大多数是为了最大化打印空间:

(defun ps-two-per-page ()
  (interactive)
  (require 'ps-print)
  (setq ps-n-up-printing    2
    ps-n-up-border-p    nil
    ps-paper-type      'letter
    ps-font-size        (quote (8 . 11))
    ps-top-margin       -20
    ps-bottom-margin    -35
    ps-left-margin      18 
    ps-right-margin     18 
    ps-n-up-margin      1  
    ps-inter-column     1  
    )
  'ps-two-per-page)

函数执行后,我将无法返回默认打印配置。我如何使用默认配置"好像我没有执行上述命令"?

如何返回打印?

另外,是否可以在"文件"下拉菜单下的emacs中绑定打印命令。意思是,我想使用默认配置来绑定" PostScript Print Buffer"的打印,而" Postscript Print Buffer(B W)"以遵循我在上述命令PS-Two-plage中所具有的配置。

wrt到第一个问题:虽然忽略PS-PRINT的细节,但在这些情况下,两种策略是采用

1)设置let

后面的变量

2)将旧值存储在前缀旧的-...并之后重置。

这里是第二种方法的草稿:

(defun ps-two-per-page ()
  (interactive)
  (require 'ps-print)
  (setq old-ps-n-up-printing ps-n-up-printing
        old-ps-n-up-border-p ps-n-up-border-p
        old-ps-paper-type ps-paper-type
        old-ps-font-size ps-font-size
        old-ps-top-margin ps-top-margin
        old-ps-bottom-margin ps-bottom-margin
        old-ps-left-margin ps-left-margin
        old-ps-right-margin ps-right-margin
        old-ps-n-up-margin ps-n-up-margin
        old-ps-inter-column ps-inter-column
        ps-n-up-printing 2
        ps-n-up-border-p nil
        ps-paper-type 'letter
        ps-font-size (quote (8 . 11))
        ps-top-margin -20
        ps-bottom-margin -35
        ps-left-margin 18
        ps-right-margin 18
        ps-n-up-margin 1
        ps-inter-column 1))

 (defun ps-restore-default ()
  "Get old values back"
  (interactive)
  (require 'ps-print)
  (setq ps-n-up-printing old-ps-n-up-printing
        ps-n-up-border-p old-ps-n-up-border-p
        ps-paper-type old-ps-paper-type
        ps-font-size old-ps-font-size
        ps-top-margin old-ps-top-margin
        ps-bottom-margin old-ps-bottom-margin
        ps-left-margin old-ps-left-margin
        ps-right-margin old-ps-right-margin
        ps-n-up-margin old-ps-n-up-margin
        ps-inter-column old-ps-inter-column)) 

相关内容

最新更新