branch: elpa/devhelp
commit 3a31a672f43a89c51d8991ac27870181591ffaf3
Author: Akib Azmain Turja <a...@disroot.org>
Commit: Akib Azmain Turja <a...@disroot.org>
Add Guix-specific search directories by default
---
devhelp.el | 12 ++++++++++--
1 file changed, 10 insertions(+), 2 deletions(-)
diff --git a/devhelp.el b/devhelp.el
index f523c408ab..43b928d74f 100644
--- a/devhelp.el
+++ b/devhelp.el
@@ -85,8 +85,16 @@ width."
:type 'boolean)
(defcustom devhelp-search-directories
- '("/usr/share/doc/" "/usr/share/gtk-doc/html/"
- "/usr/local/share/doc/" "/usr/local/share/gtk-doc/html/")
+ `("/usr/share/doc/" "/usr/share/gtk-doc/html/"
+ "/usr/local/share/doc/" "/usr/local/share/gtk-doc/html/"
+ ,@(mapcan (lambda (dir)
+ (when (and (file-exists-p dir)
+ (file-directory-p dir))
+ (list dir)))
+ '("/run/current-system/profile/share/doc/"
+ "/run/current-system/profile/share/gtk-doc/html/"
+ "~/.guix-profile/share/doc/"
+ "~/.guix-profile/share/gtk-doc/html/")))
"List of directories to search for Devhelp books.
Note that on GNU Guix, Nix or other FHS (Filesystem Hierarchy
