[elpa] externals/compat b2930079f1 3/3: compat-27: Drop obsolete `compat-call dired-get-marked-files'.

[ELPA Syncer]

branch: externals/compat
commit b2930079f10a843f70a7cb2e4ce0772a5e959180
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    compat-27: Drop obsolete `compat-call dired-get-marked-files'.
---
 NEWS.org     |  4 ++++
 compat-27.el | 13 -------------
 2 files changed, 4 insertions(+), 13 deletions(-)

diff --git a/NEWS.org b/NEWS.org
index 0a54477a0a..530759cd63 100644
--- a/NEWS.org
+++ b/NEWS.org
@@ -1,5 +1,9 @@
 #+title: compat.el - Changelog
 
+* Development
+
+- compat-27: Drop obsolete ~compat-call dired-get-marked-files~.
+
 * Release of "Compat" Version 29.1.3.4
 
 - Ensure that ~seq~ is required properly both at compile time and runtime, such
diff --git a/compat-27.el b/compat-27.el
index a2e47ca2bd..30aa97ca34 100644
--- a/compat-27.el
+++ b/compat-27.el
@@ -574,19 +574,6 @@ The return value is a string (or nil in case we can’t find 
it)."
             (or (lm-header "package-version")
                 (lm-header "version")))))))))
 
-;;;; Defined in dired.el
-
-(compat-defun dired-get-marked-files
-    (&optional localp arg filter distinguish-one-marked error)
-  "Obsolete function."
-  :obsolete "The compatibility function has been made obsolete."
-  :feature dired
-  :extended t
-  (let ((result (dired-get-marked-files localp arg filter 
distinguish-one-marked)))
-    (if (and (null result) error)
-        (user-error (if (stringp error) error "No files specified"))
-      result)))
-
 ;;;; Defined in time-date.el
 
 (compat-defun make-decoded-time ;; <compat-tests:make-decoded-time>