* lisp/obsolete/html2text.el: Don't require CL

(html2text-clean-anchor): Mark unused arg.

diff --git a/lisp/obsolete/html2text.el b/lisp/obsolete/html2text.el
index 27560a70c632137e71ead38a930d37ea7fde535b..f60b04a40446ab5d4099a4f0d6e0679007195fdf 100644 (file)
--- a/lisp/obsolete/html2text.el
+++ b/lisp/obsolete/html2text.el
@@ -38,8 +38,6 @@
 ;; <Global variables>
 ;;
 
-(eval-when-compile
-  (require 'cl))
 
 (defvar html2text-format-single-element-list '(("hr" . html2text-clean-hr)))
 
@@ -300,7 +298,7 @@ formatting, and then moved afterward.")
 (defun html2text-clean-blockquote (p1 p2 p3 p4)
   (html2text-delete-tags p1 p2 p3 p4))
 
-(defun html2text-clean-anchor (p1 p2 p3 p4)
+(defun html2text-clean-anchor (p1 p2 _p3 p4)
   ;; If someone can explain how to make the URL clickable I will surely
   ;; improve upon this.
   ;; Maybe `goto-addr.el' can be used here.