|
From: Martin R. <ru...@us...> - 2004-08-25 23:16:42
|
Update of /cvsroot/foo/foo/elkfoo/scm In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25637 Modified Files: toplevel.foo.in Log Message: added support for (readline-[read | write]-history), backwards compatible to older readline extension Index: toplevel.foo.in =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/scm/toplevel.foo.in,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** toplevel.foo.in 11 Aug 2004 12:24:37 -0000 1.4 --- toplevel.foo.in 25 Aug 2004 23:16:33 -0000 1.5 *************** *** 238,242 **** (if (bound? 'foo:cleanup) (foo:cleanup)) ! (exit)))) (provide 'foo) --- 238,245 ---- (if (bound? 'foo:cleanup) (foo:cleanup)) ! (exit))) ! ;; load history (ignore errors) ! (if (and (feature? 'readline.la) (bound? 'readline-read-history)) ! (readline-read-history (tilde-expand "~/.foo/foo_history")))) (provide 'foo) |