Browse Source

Backport commit 5da53a019 from Emacs

* lisp/org-info.el (org-info-other-documents)
(org-info-map-html-url):
* lisp/ox-html.el (org-html-creator-string): Use HTTPS instead of
HTTP.

Prefer HTTPS to HTTP for gnu.org
5da53a01912c2f5d46f5df4ef8cc13a34b5017d4
Paul Eggert
Wed Sep 13 15:54:25 2017 -0700
Paul Eggert 7 years ago
parent
commit
d4d7cda57f
2 changed files with 7 additions and 7 deletions
  1. 5 5
      lisp/org-info.el
  2. 2 2
      lisp/ox-html.el

+ 5 - 5
lisp/org-info.el

@@ -19,7 +19,7 @@
 ;; GNU General Public License for more details.
 ;; GNU General Public License for more details.
 
 
 ;; You should have received a copy of the GNU General Public License
 ;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;
 ;;
 ;;; Commentary:
 ;;; Commentary:
@@ -92,11 +92,11 @@
     "smtpmail" "speedbar" "srecode" "todo-mode" "tramp" "url" "vip" "viper"
     "smtpmail" "speedbar" "srecode" "todo-mode" "tramp" "url" "vip" "viper"
     "widget" "wisent" "woman")
     "widget" "wisent" "woman")
   "List of emacs documents available.
   "List of emacs documents available.
-Taken from <http://www.gnu.org/software/emacs/manual/html_mono/.>")
+Taken from <https://www.gnu.org/software/emacs/manual/html_mono/.>")
 
 
 (defconst org-info-other-documents
 (defconst org-info-other-documents
-  '(("libc" . "http://www.gnu.org/software/libc/manual/html_mono/libc.html")
-    ("make" . "http://www.gnu.org/software/make/manual/make.html"))
+  '(("libc" . "https://www.gnu.org/software/libc/manual/html_mono/libc.html")
+    ("make" . "https://www.gnu.org/software/make/manual/make.html"))
   "Alist of documents generated from Texinfo source.
   "Alist of documents generated from Texinfo source.
 When converting info links to HTML, links to any one of these manuals are
 When converting info links to HTML, links to any one of these manuals are
 converted to use these URL.")
 converted to use these URL.")
@@ -108,7 +108,7 @@ the official page for that document, e.g., use \"gnu.org\" for all Emacs
 related documents.  Otherwise, append \".html\" extension to FILENAME.
 related documents.  Otherwise, append \".html\" extension to FILENAME.
 See `org-info-emacs-documents' and `org-info-other-documents' for details."
 See `org-info-emacs-documents' and `org-info-other-documents' for details."
   (cond ((member filename org-info-emacs-documents)
   (cond ((member filename org-info-emacs-documents)
-	 (format "http://www.gnu.org/software/emacs/manual/html_mono/%s.html"
+	 (format "https://www.gnu.org/software/emacs/manual/html_mono/%s.html"
 		 filename))
 		 filename))
 	((cdr (assoc filename org-info-other-documents)))
 	((cdr (assoc filename org-info-other-documents)))
 	(t (concat filename ".html"))))
 	(t (concat filename ".html"))))

+ 2 - 2
lisp/ox-html.el

@@ -19,7 +19,7 @@
 ;; GNU General Public License for more details.
 ;; GNU General Public License for more details.
 
 
 ;; You should have received a copy of the GNU General Public License
 ;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
 
 
 ;;; Commentary:
 ;;; Commentary:
 
 
@@ -1325,7 +1325,7 @@ like that: \"%%\"."
   :type 'string)
   :type 'string)
 
 
 (defcustom org-html-creator-string
 (defcustom org-html-creator-string
-  (format "<a href=\"http://www.gnu.org/software/emacs/\">Emacs</a> %s (<a href=\"http://orgmode.org\">Org</a> mode %s)"
+  (format "<a href=\"https://www.gnu.org/software/emacs/\">Emacs</a> %s (<a href=\"http://orgmode.org\">Org</a> mode %s)"
 	  emacs-version
 	  emacs-version
 	  (if (fboundp 'org-version) (org-version) "unknown version"))
 	  (if (fboundp 'org-version) (org-version) "unknown version"))
   "Information about the creator of the HTML document.
   "Information about the creator of the HTML document.