[AUCTeX-diffs] Changes to auctex/tex.el,v

[Tassilo Horn]

CVSROOT:        /sources/auctex
Module name:    auctex
Changes by:     Tassilo Horn <tsdh>     11/06/05 09:33:47

Index: tex.el
===================================================================
RCS file: /sources/auctex/auctex/tex.el,v
retrieving revision 5.681
retrieving revision 5.682
diff -u -b -r5.681 -r5.682
--- tex.el      5 Jun 2011 08:49:26 -0000       5.681
+++ tex.el      5 Jun 2011 09:33:47 -0000       5.682
@@ -1422,8 +1422,13 @@
   ;; FILE may be given as relative path to the TeX-master root document or as
   ;; absolute file:// URL.  In the former case, the tex file has to be already
   ;; opened.
+  (let ((buf (let ((f (condition-case nil
+                         (progn
   (require 'url-parse)
-  (let ((buf (let ((f (aref (url-generic-parse-url file) 6)))
+                           (aref (url-generic-parse-url file) 6))
+                       ;; For Emacs 21 compatibility, which doesn't have the
+                       ;; url package.
+                       (file-error (replace-regexp-in-string "^file://" "" 
file)))))
               (if (file-name-absolute-p f)
                   (find-file f)
                 (get-buffer (file-name-nondirectory file)))))