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)
|
