severity 18439 wishlist
tags 18439 notabug
thanks
David Michael <[email protected]> writes:
> * guile-readline/ice-9/readline.scm (history-file): When the HOME
> environment variable is unset, use the current directory instead.
> ---
> guile-readline/ice-9/readline.scm | 3 ++-
> 1 file changed, 2 insertions(+), 1 deletion(-)
>
> diff --git a/guile-readline/ice-9/readline.scm
> b/guile-readline/ice-9/readline.scm
> index 02e68af..df2edaf 100644
> --- a/guile-readline/ice-9/readline.scm
> +++ b/guile-readline/ice-9/readline.scm
> @@ -119,7 +119,8 @@
> (define-once the-readline-port #f)
>
> (define-once history-variable "GUILE_HISTORY")
> -(define-once history-file (string-append (getenv "HOME") "/.guile_history"))
> +(define-once history-file
> + (string-append (or (getenv "HOME") ".") "/.guile_history"))
>
> (define-public readline-port
> (let ((do (lambda (r/w)
Pushed to the stable-2.0 branch, commit
3a3316e200ac49f0e8e9004c233747efd9f54a04.
I'm closing this ticket now.
Thanks!
Mark
