Mercurial > hgrepos > hgweb.cgi > yatex
diff yatex.el @ 351:0fc7ea5baa5f dev
YaTeX-system takes two more args for utilization from YaTeX-preview-jump-file.
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Sun, 21 Dec 2014 11:40:06 +0900 |
parents | 91ba61bb536e |
children | ecf7b5543e65 |
line wrap: on
line diff
--- a/yatex.el Sat Dec 20 20:30:33 2014 +0900 +++ b/yatex.el Sun Dec 21 11:40:06 2014 +0900 @@ -1,6 +1,6 @@ ;;; yatex.el --- Yet Another tex-mode for emacs //–ì’¹// -*- coding: sjis -*- ;;; (c)1991-2014 by HIROSE Yuuji.[yuuji@yatex.org] -;;; Last modified Sat Dec 20 19:43:33 2014 on firestorm +;;; Last modified Sun Dec 21 11:05:59 2014 on firestorm ;;; $Id$ ;;; The latest version of this software is always available at; ;;; http://www.yatex.org/ @@ -1654,7 +1654,7 @@ "MAKEINDEX" makeindex-command arg)) ((= c ?k) (YaTeX-kill-typeset-process YaTeX-typeset-process)) ((= c ?p) (call-interactively 'YaTeX-preview)) - ((= c ?q) (YaTeX-system "lpq" "*Printer queue*")) + ((= c ?q) (YaTeX-system "lpq" "Printer queue")) ((= c ?d) (YaTeX-typeset-buffer (or (YaTeX-get-builtin "DVIPDF") YaTeX-dvipdf-command)) (put 'dvi2-command 'format 'pdf)) @@ -2006,9 +2006,8 @@ (let ((default-directory basedir)) (cond ((stringp cmd) - (let ((buf (concat "* " cmd " " src " *"))) - (YaTeX-system (concat cmd " " src) buf) - t)) + (YaTeX-system (concat cmd " " src) cmd) + t) ((eq t cmd) (let ((parent buffer-file-name)) (funcall