/[emacs]/emacs/lisp/textmodes/tex-mode.el
ViewVC logotype

Diff of /emacs/lisp/textmodes/tex-mode.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.172 by lektu, Wed Aug 31 10:32:22 2005 UTC revision 1.173 by monnier, Fri Sep 2 18:24:29 2005 UTC
# Line 1580  Return the process in which TeX is runni Line 1580  Return the process in which TeX is runni
1580             (star (string-match "\\*" cmd))             (star (string-match "\\*" cmd))
1581             (string             (string
1582              (concat              (concat
1583               (if file               (if (null file)
1584                   (if star (concat (substring cmd 0 star)                   cmd
1585                                    (shell-quote-argument file)                 (if (file-name-absolute-p file)
1586                                    (substring cmd (1+ star)))                     (setq file (convert-standard-filename file)))
1587                     (concat cmd " " (shell-quote-argument file)))                 (if star (concat (substring cmd 0 star)
1588                 cmd)                                  (shell-quote-argument file)
1589                                    (substring cmd (1+ star)))
1590                     (concat cmd " " (shell-quote-argument file))))
1591               (if background "&" ""))))               (if background "&" ""))))
1592        ;; Switch to buffer before checking for subproc output in it.        ;; Switch to buffer before checking for subproc output in it.
1593        (set-buffer buf)        (set-buffer buf)
# Line 1763  FILE is typically the output DVI or PDF Line 1765  FILE is typically the output DVI or PDF
1765           (save-excursion           (save-excursion
1766             (goto-char (point-max))             (goto-char (point-max))
1767             (and (re-search-backward             (and (re-search-backward
1768                   "(see the transcript file for additional information)" nil t)                   (concat
1769                      "(see the transcript file for additional information)"
1770                      "\\|^Output written on .*"
1771                      (regexp-quote (file-name-nondirectory file))
1772                      " (.*)\\.") nil t)
1773                  (> (save-excursion                  (> (save-excursion
1774                       (or (re-search-backward "\\[[0-9]+\\]" nil t)                       (or (re-search-backward "\\[[0-9]+\\]" nil t)
1775                           (point-min)))                           (point-min)))
# Line 1945  FILE is typically the output DVI or PDF Line 1951  FILE is typically the output DVI or PDF
1951                                        default-directory))))                                        default-directory))))
1952                (not dir))                (not dir))
1953      (let (shell-dirtrack-verbose)      (let (shell-dirtrack-verbose)
1954        (tex-send-command tex-shell-cd-command        (tex-send-command tex-shell-cd-command dir)))
                         (concat "\"" (convert-standard-filename dir) "\""))))  
1955    (with-current-buffer (process-buffer (tex-send-command cmd))    (with-current-buffer (process-buffer (tex-send-command cmd))
1956      (setq compilation-last-buffer (current-buffer))      (setq compilation-last-buffer (current-buffer))
1957      (compilation-forget-errors)      (compilation-forget-errors)
# Line 2311  Runs the shell command defined by `tex-s Line 2316  Runs the shell command defined by `tex-s
2316          (tex-out-file          (tex-out-file
2317           (tex-append (file-name-nondirectory (buffer-file-name)) ""))           (tex-append (file-name-nondirectory (buffer-file-name)) ""))
2318          (file-dir (file-name-directory (buffer-file-name))))          (file-dir (file-name-directory (buffer-file-name))))
2319      (tex-send-command tex-shell-cd-command      (tex-send-command tex-shell-cd-command file-dir)
                       (concat "\"" (convert-standard-filename file-dir) "\""))  
2320      (tex-send-command tex-bibtex-command tex-out-file))      (tex-send-command tex-bibtex-command tex-out-file))
2321    (tex-display-shell))    (tex-display-shell))
2322    

Legend:
Removed from v.1.172  
changed lines
  Added in v.1.173

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26