diff options
author | Debian Emacs addons team <pkg-emacsen-addons@lists.alioth.debian.org> | 2017-01-15 22:05:09 -0700 |
---|---|---|
committer | Nicholas D Steeves <nsteeves@gmail.com> | 2017-01-15 22:05:09 -0700 |
commit | d79282960d4445deec501e96c93afe332b827424 (patch) | |
tree | b3e7f90755ed58c69ae65f9d168ac475e6a4f566 | |
parent | 17d5fbd87fcf6fb7a450defb564552f6ac2e35d9 (diff) |
use_see_not_open
===================================================================
Gbp-Pq: Name use_see_not_open.diff
-rw-r--r-- | lisp/muse-context.el | 2 | ||||
-rw-r--r-- | lisp/muse-groff.el | 2 | ||||
-rw-r--r-- | lisp/muse-latex.el | 2 | ||||
-rw-r--r-- | lisp/muse-texinfo.el | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/lisp/muse-context.el b/lisp/muse-context.el index 45968b0..7431ce1 100644 --- a/lisp/muse-context.el +++ b/lisp/muse-context.el @@ -393,7 +393,7 @@ and it will do what you expect." ""))) (defun muse-context-pdf-browse-file (file) - (shell-command (concat "open " file))) + (shell-command (concat "see " (shell-quote-argument file)))) (defun muse-context-pdf-generate (file output-path final-target) (apply diff --git a/lisp/muse-groff.el b/lisp/muse-groff.el index 7218652..7c47d24 100644 --- a/lisp/muse-groff.el +++ b/lisp/muse-groff.el @@ -227,7 +227,7 @@ command characters." (muse-groff-concat-lists)) (defun muse-groff-pdf-browse-file (file) - (shell-command (concat "open " file))) + (shell-command (concat "see " (shell-quote-argument file)))) (defun muse-groff-pdf-generate (file output-path final-target) (muse-publish-transform-output diff --git a/lisp/muse-latex.el b/lisp/muse-latex.el index e416367..679d1d3 100644 --- a/lisp/muse-latex.el +++ b/lisp/muse-latex.el @@ -65,7 +65,7 @@ :type 'string :group 'muse-latex) -(defcustom muse-latex-pdf-browser "open %s" +(defcustom muse-latex-pdf-browser "see %s" "The program to use when browsing a published PDF file. This should be a format string." :type 'string diff --git a/lisp/muse-texinfo.el b/lisp/muse-texinfo.el index 4ad0092..3d256fd 100644 --- a/lisp/muse-texinfo.el +++ b/lisp/muse-texinfo.el @@ -272,7 +272,7 @@ If no description exists for the link, use the link itself." (texinfo-all-menus-update t)) (defun muse-texinfo-pdf-browse-file (file) - (shell-command (concat "open " file))) + (shell-command (concat "see " (shell-quote-argument file)))) (defun muse-texinfo-info-generate (file output-path final-target) ;; The version of `texinfmt.el' that comes with Emacs 21 doesn't |