CVSROOT: /cvsroot/auctex
Module name: auctex
Changes by: Ralf Angeli <angeli> 06/06/11 14:16:45
Index: tex.el
===================================================================
RCS file: /cvsroot/auctex/auctex/tex.el,v
retrieving revision 5.573
retrieving revision 5.574
diff -u -b -r5.573 -r5.574
--- tex.el 7 Jun 2006 08:59:26 -0000 5.573
+++ tex.el 11 Jun 2006 14:16:45 -0000 5.574
@@ -4744,7 +4744,9 @@
(call-process "texdoc" nil 0 nil doc)))
(latex-info (latex-mode)
(lambda ()
- (when (Info-find-file "latex" t)
+ (when (condition-case nil ; If function is not available.
+ (Info-find-file "latex" t)
+ (error nil))
(mapcar (lambda (x)
(let ((x (car x)))
(if (string-match "\\`\\\\" x)
@@ -4754,7 +4756,9 @@
(info-lookup-symbol (concat "\\" doc) 'latex-mode)))
(texinfo-info (texinfo-mode)
(lambda ()
- (when (Info-find-file "texinfo" t)
+ (when (condition-case nil ; If function is not available.
+ (Info-find-file "texinfo" t)
+ (error nil))
(mapcar (lambda (x)
(let ((x (car x)))
(if (string-match "\\`@" x)
@@ -4793,7 +4797,7 @@
(if (null docs)
(message "No documentation found")
;; Ask the user about the package, command, or document.
- (when (and (called-interactively-p)
+ (when (and (interactive-p)
(or (not name) (string= name "")))
(let ((symbol (thing-at-point 'symbol))
contained completions doc)
_______________________________________________
auctex-diffs mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/auctex-diffs
