[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH 5/5] eww: Check for `html-mode' using `fboundp'.
From: |
Rüdiger Sonderfeld |
Subject: |
[PATCH 5/5] eww: Check for `html-mode' using `fboundp'. |
Date: |
Fri, 20 Dec 2013 00:44:57 +0100 |
User-agent: |
KMail/4.11.2 (Linux/3.11.0-14-generic; KDE/4.11.2; x86_64; ; ) |
`html-mode' is provided by `sgml-mode' in GNU Emacs. Therefore it
should be checked for with `fboundp' instead of `featurep'.
* lisp/net/eww.el (eww-view-source): Check for `html-mode' with
`fboundp'.
---
lisp/ChangeLog | 1 +
lisp/net/eww.el | 2 +-
2 files changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 14d539d..c57620c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -9,6 +9,7 @@
(eww-render, eww-mode): Use `setq-local'.
(eww-tool-bar-map): New variable.
(eww-mode): Set `tool-bar-map'.
+ (eww-view-source): Check for `html-mode' with `fboundp'.
2013-12-19 Teodor Zlatanov <address@hidden>
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index cae5cfd..df53d80 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -388,7 +388,7 @@ (defun eww-view-source ()
(delete-region (point-min) (point-max))
(insert (or eww-current-source "no source"))
(goto-char (point-min))
- (when (featurep 'html-mode)
+ (when (fboundp 'html-mode)
(html-mode)))
(view-buffer buf)))
--
1.8.5
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [PATCH 5/5] eww: Check for `html-mode' using `fboundp'.,
Rüdiger Sonderfeld <=