master 9ad5421a62 2/2: Drop support for obsolete "Lisp Code Directory" from ffap

[Stefan Kangas]

branch: master
commit 9ad5421a62ab2780f1116bc4bbf88b32d4472d64
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>

    Drop support for obsolete "Lisp Code Directory" from ffap
    
    Ref: https://flex.phys.tohoku.ac.jp/texi/faq/faq_146.html
    Note also that the host "archive.cis.ohio-state.edu" is unknown.
    * lisp/ffap.el (ffap-alist): Drop support for obsolete "Lisp Code
    Directory".
    (ffap-lcd): Make obsolete.
---
 lisp/ffap.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/ffap.el b/lisp/ffap.el
index a81d913014..d490cd434a 100644
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -778,7 +778,6 @@ This uses `ffap-file-exists-string', which may try adding 
suffixes from
     ("\\.\\(tex\\|sty\\|doc\\|cls\\)\\'" . ffap-tex)
     ("\\.bib\\'" . ffap-bib)           ; search ffap-bib-path
     ("\\`\\." . ffap-home)             ; .emacs, .bashrc, .profile
-    ("\\`~/" . ffap-lcd)               ; |~/misc/ffap.el.Z|
     ;; This used to have a blank, but ffap-string-at-point doesn't
     ;; handle blanks.
     ;; https://lists.gnu.org/r/emacs-devel/2008-01/msg01058.html
@@ -1026,7 +1025,7 @@ out of NAME."
 
 ;; Maybe a "Lisp Code Directory" reference:
 (defun ffap-lcd (name)
-  ;; FIXME: Is this still in use?
+  (declare (obsolete nil "29.1"))
   (and
    (or
     ;; lisp-dir-apropos output buffer: