We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 7002bef commit c18e00cCopy full SHA for c18e00c
1 file changed
lisp/forge-core.el
@@ -239,10 +239,9 @@ Entries have the form (GITHOST APIHOST WEBHOST CLASS).
239
If no entry matches, return nil, or signal an error if optional DEMAND
240
is non-nil."
241
(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
+ (assoc (seq-some (##and (string-prefix-p "hostname" %)
+ (substring % 9))
+ (ignore-error file-missing
246
(process-lines-ignore-status "ssh" "-G" host)))
247
forge-alist)
248
(car (cl-member host forge-alist :test #'equal :key #'caddr))
0 commit comments