master ef7d9c4775e 2/2: ; Silence warnings about obsolete functions

[Mattias Engdegård]

branch: master
commit ef7d9c4775eb8559210564efdcf0d1930318f5e0
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>

    ; Silence warnings about obsolete functions
    
    * 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.
---
 lisp/obsolete/url-ns.el   | 5 +++--
 lisp/progmodes/ebnf2ps.el | 2 +-
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/obsolete/url-ns.el b/lisp/obsolete/url-ns.el
index 20318867634..53db684887c 100644
--- a/lisp/obsolete/url-ns.el
+++ b/lisp/obsolete/url-ns.el
@@ -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)
diff --git a/lisp/progmodes/ebnf2ps.el b/lisp/progmodes/ebnf2ps.el
index 3e83d288408..819f39cb4e5 100644
--- a/lisp/progmodes/ebnf2ps.el
+++ b/lisp/progmodes/ebnf2ps.el
@@ -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