procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; Silence warnings about obsolete functions

Browse source 
* lisp/obsolete/url-ns.el (dnsResolve, isResolvable): Suppress.
* lisp/progmodes/ebnf2ps.el (ebnf-eps-finish-and-write):
Use delete-dups instead of ps-remove-duplicates.
This commit is contained in:
Mattias Engdegård 2023-09-03 11:40:20 +02:00
parent c290b034e0
commit ef7d9c4775
2 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/obsolete/url-ns.el
View file

@ -39,13 +39,14 @@
;;;###autoload
(defun dnsResolve (host)
(url-gateway-nslookup-host host))
(with-suppressed-warnings ((obsolete url-gateway-nslookup-host))
(url-gateway-nslookup-host host)))
;;;###autoload
(defun isResolvable (host)
(if (string-match "^[0-9.]+$" host)
t
(not (string= host (url-gateway-nslookup-host host)))))
(not (string= host (dnsResolve host)))))
;;;###autoload
(defun isInNet (ip net mask)

2
lisp/progmodes/ebnf2ps.el
View file

@ -5247,7 +5247,7 @@ killed after process termination."
(or ebnf-fonts-required
(setq ebnf-fonts-required
(mapconcat #'identity
(ps-remove-duplicates
(delete-dups
(mapcar #'ebnf-font-name-select
(list ebnf-production-font
ebnf-terminal-font