From c2966bf4a4e53c4f9ce5a641bbd6dd4c46d8628b Mon Sep 17 00:00:00 2001 From: "pls.153" Date: Sat, 2 Dec 2023 16:32:54 +0100 Subject: [PATCH] revision --- examples/cl-repl/lisp/editor.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/examples/cl-repl/lisp/editor.lisp b/examples/cl-repl/lisp/editor.lisp index 33d73ad..b92ad71 100644 --- a/examples/cl-repl/lisp/editor.lisp +++ b/examples/cl-repl/lisp/editor.lisp @@ -759,7 +759,8 @@ (defvar *history* (make-array 0 :adjustable t :fill-pointer t)) (defvar *history-index* nil) -(defvar *history-file* (merge-pathnames ".repl-history" (user-homedir-pathname))) +(defvar *history-file* #+(or android ios) ".repl-history" + #-(or android ios) (merge-pathnames ".cl-repl-history" (user-homedir-pathname))) (defvar *max-history* 100) (defun read-saved-history ()