picolisp

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/picolisp.git/
Log | Files | Refs | README | LICENSE

commit 6f59e57ed2f9a00731eec7c20c33f028722633c5
parent 9897d96a0c98c3e88884ecc66c8f1b1b5cfca7c6
Author: Commit-Bot <unknown>
Date:   Wed, 23 Jun 2010 06:58:31 +0000

Automatic commit from picoLisp.tgz, From: Wed, 23 Jun 2010 06:58:31 GMT
Diffstat:
Mdoc/refV.html | 13+++++++------
Mlib/debug.l | 4++--
Msrc64/version.l | 4++--
3 files changed, 11 insertions(+), 10 deletions(-)

diff --git a/doc/refV.html b/doc/refV.html @@ -101,12 +101,13 @@ $ ./p -version <dt><code>(vi 'sym 'cls) -> sym</code> <dt><code>(vi '(sym . cls)) -> sym</code> <dt><code>(vi) -> NIL</code> -<dd>Opens the "vi" editor on the function or method definition of -<code>sym</code>. A call to <code><a href="refL.html#ld">ld</a></code> -thereafter will <code><a href="refL.html#load">load</a></code> the modified -file. See also <code><a href="refD.html#doc">doc</a></code>, <code><a -href="refP.html#pp">pp</a></code>, <code><a -href="refD.html#*Dbg">*Dbg</a></code>, <code><a +<dd>Opens the editor specified by the environment variable <code>EDITOR</code> +(or <code>vim</code> if that variable is not set) on the function or method +definition of <code>sym</code>. A call to <code><a +href="refL.html#ld">ld</a></code> thereafter will <code><a +href="refL.html#load">load</a></code> the modified file. See also <code><a +href="refD.html#doc">doc</a></code>, <code><a href="refP.html#pp">pp</a></code>, +<code><a href="refD.html#*Dbg">*Dbg</a></code>, <code><a href="refD.html#debug">debug</a></code> and <code><a href="refP.html#pp">pp</a></code>. diff --git a/lib/debug.l b/lib/debug.l @@ -1,4 +1,4 @@ -# 12mar10abu +# 23jun10abu # (c) Software Lab. Alexander Burger # Browsing @@ -161,7 +161,7 @@ (get C '*Dbg -1 "X") (get "X" '*Dbg 1) ) ) "*Vi" ) - (call 'vim + (call (or (sys "EDITOR") 'vim) (pack "+" (car "*Vi")) (path (cdr "*Vi")) ) "X" ) ) diff --git a/src64/version.l b/src64/version.l @@ -1,6 +1,6 @@ -# 21jun10abu +# 23jun10abu # (c) Software Lab. Alexander Burger -(de *Version 3 0 2 33) +(de *Version 3 0 2 34) # vi:et:ts=3:sw=3