[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/systemd e52a5da 005/131: find a default uri harder
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/systemd e52a5da 005/131: find a default uri harder |
Date: |
Sun, 29 Aug 2021 11:35:04 -0400 (EDT) |
branch: elpa/systemd
commit e52a5da19e8affdfc782952c1de0b83128b3b14a
Author: Mark Oteiza <mvoteiza@udel.edu>
Commit: Mark Oteiza <mvoteiza@udel.edu>
find a default uri harder
saves a keystroke if there is only one link
---
systemd-mode.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/systemd-mode.el b/systemd-mode.el
index 90ef1c8..a2fe7db 100644
--- a/systemd-mode.el
+++ b/systemd-mode.el
@@ -90,11 +90,13 @@ as a list of strings, otherwise nil."
"Open URL. Interactively completes the documentation in the
current unit file, defaulting to the link under point, if any."
(interactive
- (let* ((uri (thing-at-point-url-at-point))
+ (let* ((collection (systemd-doc-find))
+ (uri (or (thing-at-point-url-at-point)
+ (car-safe collection)))
(prompt (concat "URL"
(when uri (format " (default %s)" uri))
": ")))
- (list (completing-read prompt (systemd-doc-find) nil nil nil nil uri))))
+ (list (completing-read prompt collection nil nil nil nil uri))))
(let ((link (url-generic-parse-url url)))
(pcase (url-type link)
("file" (find-file (url-filename link)))
- [nongnu] branch elpa/systemd created (now b6ae63a), ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd e52a5da 005/131: find a default uri harder,
ELPA Syncer <=
- [nongnu] elpa/systemd d58763e 006/131: minor cleanup, ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd e385575 015/131: initial company support for directives, ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd feb6dad 007/131: add Makefile, ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd 1689dd5 010/131: ._., ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd a22a097 009/131: use function-item in customize, ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd d0a46fe 014/131: rename systemd-mode.el → systemd.el, ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd b60ccd5 022/131: point to commentary from README, ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd 039bed6 004/131: add license, ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd f32ecf8 011/131: tag it, ELPA Syncer, 2021/08/29
- [nongnu] elpa/systemd 2a27186 023/131: format the list more programmatically, ELPA Syncer, 2021/08/29