41 lines
1.4 KiB
Plaintext
41 lines
1.4 KiB
Plaintext
$OpenBSD: patch-guiserver_newlisp-edit_lsp,v 1.5 2016/01/24 19:44:04 jasper Exp $
|
|
--- guiserver/newlisp-edit.lsp.orig Sun Jan 24 20:34:36 2016
|
|
+++ guiserver/newlisp-edit.lsp Sun Jan 24 20:35:41 2016
|
|
@@ -1,4 +1,4 @@
|
|
-#!/usr/local/bin/newlisp
|
|
+#!${PREFIX}/bin/newlisp
|
|
|
|
; newlisp-edit.lsp - multiple tab LISP editor and support for running code from the editor
|
|
; needs 9.9.2 version minimum to run
|
|
@@ -158,7 +158,7 @@
|
|
(write-file file (base64-dec text)))
|
|
(if (= ostype "Windows")
|
|
(catch (exec (string {newlisp.exe "} currentScriptFile {" } file " > " (string file "out"))) 'result)
|
|
- (catch (exec (string "/usr/local/bin/newlisp " currentScriptFile " " file)) 'result)
|
|
+ (catch (exec (string "${PREFIX}/bin/newlisp " currentScriptFile " " file)) 'result)
|
|
)
|
|
(if (list? result)
|
|
(begin
|
|
@@ -226,7 +226,7 @@
|
|
(gs:run-shell 'OutputArea
|
|
(string newlispDir "/newlisp.exe") (string currentExtension " -C -w \"" $HOME "\""))
|
|
(gs:run-shell 'OutputArea
|
|
- (string "/usr/local/bin/newlisp") (string currentExtension " -C -w " $HOME))
|
|
+ (string "${PREFIX}/bin/newlisp") (string currentExtension " -C -w " $HOME))
|
|
)
|
|
)
|
|
|
|
@@ -1449,11 +1449,7 @@
|
|
; all other UNIX
|
|
(true
|
|
(set 'files '(
|
|
- "/usr/bin/sensible-browser"
|
|
- "/usr/bin/x-www-browser"
|
|
- "/usr/bin/mozilla"
|
|
- "/usr/bin/firefox"
|
|
- "/usr/bin/konqueror"
|
|
+ "${LOCALBASE}/bin/xdg-open"
|
|
))
|
|
(set 'prog (find true (map file? files)))
|
|
(if prog
|