Merge branch 'master' of https://git.sr.ht/~acdw/.emacs.d into master

1 files changed, 22 insertions, 1 deletions

@@ -368,7 +368,8 @@
               ("n" . elpher-next-link)
               ("p" . elpher-prev-link)
               ("o" . elpher-follow-current-link)
-              ("G" . elpher-go-current)))
+              ("G" . elpher-go-current))
+  :hook (elpher-mode-hook . variable-pitch-mode))
 
 (use-package gemini-mode
   :straight (gemini-mode
@@ -580,6 +581,26 @@
 
 ;;; eshell
 
+(use-package eshell
+  :init
+  (defun eshell/emacs (&rest args)
+    "Open a file in emacs."
+    (if (null args)
+        (bury-buffer)
+      (mapc #'find-file
+            (mapcar #'expand-file-name
+                    (eshell-flatten-list (reverse args))))))
+  (defun eshell/info (&optional subject)
+    "Invoke `info', optionally opening Info to SUBJECT."
+    (require 'cl)
+    (let ((buf (current-buffer)))
+      (Info-directory)
+      (if (not (null subject))
+          (let ((node-exists (ignore-errors (Info-menu subject))))
+            (if (not node-exists)
+                (format "No menu item `%s' in node `(dir)Top'."
+                        subject)))))))
+
 (use-package eshell-syntax-highlighting
   :after esh-mode
   :config