CVSROOT:        /cvsroot/auctex
Module name:    auctex
Changes by:     Ralf Angeli <angeli>    09/12/30 17:22:58

Index: tex.el
===================================================================
RCS file: /cvsroot/auctex/auctex/tex.el,v
retrieving revision 5.659
retrieving revision 5.660
diff -u -b -r5.659 -r5.660
--- tex.el      26 Dec 2009 14:21:55 -0000      5.659
+++ tex.el      30 Dec 2009 17:22:58 -0000      5.660
@@ -1207,6 +1207,10 @@
     (while (and (setq entry (pop selection)) (not viewer))
       (when (TeX-view-match-predicate (car entry))
        (setq viewer (cadr entry))))
+    ;; Abort if no matching viewer is found.  This prevents infinite
+    ;; loops when trying to expand the viewer command.
+    (unless viewer
+      (error "No matching viewer found"))
     ;; Get the command line or function spec.
     (setq spec (cadr (assoc viewer (append TeX-view-program-list
                                           TeX-view-program-list-builtin))))


_______________________________________________
auctex-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/auctex-diffs

Reply via email to