1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
From: Nick Gasson <nick@nickg.me.uk>
Date: Sun, 3 May 2020 20:50:05 +0800
Subject: Use sensible-browser in Guile browse-url
---
guile.init | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/guile.init b/guile.init
index a728e33..ffba86f 100755
--- a/guile.init
+++ b/guile.init
@@ -509,7 +509,8 @@
;; tty).
(define (browse-url url)
(define (try cmd end) (zero? (system (string-append cmd url end))))
- (or (try "netscape-remote -remote 'openURL(" ")'")
+ (or (try "sensible-browser '" "'")
+ (try "netscape-remote -remote 'openURL(" ")'")
(try "netscape -remote 'openURL(" ")'")
(try "netscape '" "'&")
(try "netscape '" "'")))
|
