[elpa] externals/auctex 0294aff 07/10: Fixup dropping old implementations for viewers

[Tassilo Horn]

branch: externals/auctex
commit 0294affb12fe054cae7b903e667b56514bf47abb
Author: Ikumi Keita <ikumi@ikumi.que.jp>
Commit: Ikumi Keita <ikumi@ikumi.que.jp>

    Fixup dropping old implementations for viewers
    
    * tex-buf.el (TeX-output-style-check): Remove function only useful for
    old view implementations.
---
 tex-buf.el | 23 -----------------------
 1 file changed, 23 deletions(-)

diff --git a/tex-buf.el b/tex-buf.el
index 155ac87..c7b7c8a 100644
--- a/tex-buf.el
+++ b/tex-buf.el
@@ -952,29 +952,6 @@ depending on the last command issued."
        (TeX-command "View" 'TeX-active-master 0)
       (message "Output file %S does not exist." output-file))))
 
-(defun TeX-output-style-check (styles)
-  "Check STYLES compared to the current view output file extension and
-the current style options."
-  (let ((ext  (TeX-output-extension))
-       (files (TeX-style-list)))
-    (while (and
-           styles
-           (or
-            (not (string-match (car (car styles)) ext))
-            (let ((style (nth 1 (car styles))))
-              (cond
-               ((listp style)
-                (while
-                    (and style
-                         (TeX-member (car style) files 'string-match))
-                  (setq style (cdr style)))
-                style)
-               ((not (TeX-member style files 'string-match)))))))
-      (setq styles (cdr styles)))
-    (if styles
-       (nth 2 (car styles))
-      "%v")))
-
 ;;; Command Hooks
 
 (defvar TeX-after-compilation-finished-functions nil