Skip to content

Commit c18e00c

Browse files
committed
forge--get-forge-host: Tighten ignoring error
1 parent 7002bef commit c18e00c

1 file changed

Lines changed: 3 additions & 4 deletions

File tree

lisp/forge-core.el

Lines changed: 3 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -239,10 +239,9 @@ Entries have the form (GITHOST APIHOST WEBHOST CLASS).
239239
If no entry matches, return nil, or signal an error if optional DEMAND
240240
is non-nil."
241241
(or (assoc host forge-alist)
242-
(assoc (seq-some (lambda (line)
243-
(and (string-prefix-p "hostname" line)
244-
(substring line 9)))
245-
(ignore-errors
242+
(assoc (seq-some (##and (string-prefix-p "hostname" %)
243+
(substring % 9))
244+
(ignore-error file-missing
246245
(process-lines-ignore-status "ssh" "-G" host)))
247246
forge-alist)
248247
(car (cl-member host forge-alist :test #'equal :key #'caddr))

0 commit comments

Comments
 (0)