diff options
| author | Richard M. Stallman <rms@gnu.org> | 2004-05-22 07:38:06 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2004-05-22 07:38:06 +0000 |
| commit | 2a1e88faed05db277f3c0f95d20dff8c198b1b2c (patch) | |
| tree | 79ff0734593681f0b8318b1f6220825284423304 /lisp/gs.el | |
| parent | 7d57db2916957d1ea8b8d1582d96de6fb9ecea05 (diff) | |
| download | emacs-2a1e88faed05db277f3c0f95d20dff8c198b1b2c.tar.gz | |
(gs-options): Add -dSAFER. Mark it risky.
Diffstat (limited to 'lisp/gs.el')
| -rw-r--r-- | lisp/gs.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gs.el b/lisp/gs.el index f160dca197a..284b18251ec 100644 --- a/lisp/gs.el +++ b/lisp/gs.el @@ -39,12 +39,14 @@ (defvar gs-options '("-q" ;"-dNOPAUSE" + "-dSAFER" "-dBATCH" "-sDEVICE=<device>" "<file>") "List of command line arguments to pass to Ghostscript. Arguments may contain place-holders `<file>' for the name of the input file, and `<device>' for the device to use.") +(put 'gs-options 'risky-local-variable t) (defun gs-options (device file) "Return a list of command line options with place-holders replaced. @@ -55,7 +57,6 @@ FILE is the value to substitute for the place-holder `<file>'." option (replace-regexp-in-string "<file>" file option))) gs-options)) - ;; The GHOSTVIEW property (taken from gv 3.5.8). ;; ;; Type: |