[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/devdocs 85424af31d 3/4: Use string-remove-prefix instea
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/devdocs 85424af31d 3/4: Use string-remove-prefix instead of seq-rest hack |
|
Date: |
Mon, 27 Nov 2023 12:57:59 -0500 (EST) |
branch: externals/devdocs
commit 85424af31d971b8465b37454f5bac967915b9729
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>
Use string-remove-prefix instead of seq-rest hack
---
devdocs.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/devdocs.el b/devdocs.el
index b4fe3b2e8f..c18bb1287b 100644
--- a/devdocs.el
+++ b/devdocs.el
@@ -38,7 +38,8 @@
(require 'shr)
(require 'url-expand)
(eval-when-compile
- (require 'let-alist))
+ (require 'let-alist)
+ (require 'subr-x))
(unless (libxml-available-p)
(display-warning 'devdocs "This package requires Emacs to be compiled with
libxml2"))
@@ -436,7 +437,8 @@ Interactively, read a page name with completion."
(pcase (string-to-char path)
('?/ path)
('?# (concat (devdocs--path-file base) path))
- (_ (seq-rest ;; drop leading slash
+ (_ (string-remove-prefix
+ "/"
(url-expander-remove-relative-links ;; undocumented function!
(concat (file-name-directory base) path))))))