]> code.delx.au - gnu-emacs/blobdiff - lisp/url/url-methods.el
Update copyright year to 2015
[gnu-emacs] / lisp / url / url-methods.el
index 26fe72014f798ce17f0d338959aa1b7a1d1ebd48..a4f711b7004bafc223ad3f8e4eb42a3007ddf110 100644 (file)
@@ -1,6 +1,6 @@
 ;;; url-methods.el --- Load URL schemes as needed
 
-;; Copyright (C) 1996-1999, 2004-2012 Free Software Foundation, Inc.
+;; Copyright (C) 1996-1999, 2004-2015 Free Software Foundation, Inc.
 
 ;; Keywords: comm, data, processes, hypermedia
 
@@ -118,7 +118,9 @@ it has not already been loaded."
        (let* ((stub (concat "url-" scheme))
               (loader (intern stub)))
          (condition-case ()
-             (require loader)
+             ;; url-https.el was merged into url-http because of 8+3
+             ;; filename limitations, so we have to do this dance.
+             (require (if (equal "https" scheme) 'url-http loader))
            (error nil))
          (if (fboundp loader)
              (progn