mirror of
https://gitlab.com/eql/lqml.git
synced 2026-01-06 01:02:10 -08:00
revision
This commit is contained in:
parent
a08d265e04
commit
37c1458a71
2 changed files with 2 additions and 3 deletions
|
|
@ -48,8 +48,7 @@ win32: LIBS += -L../../../platforms/windows/lib
|
||||||
|
|
||||||
win32 {
|
win32 {
|
||||||
LIBS += -lws2_32
|
LIBS += -lws2_32
|
||||||
RC_ICONS = ../platforms/windows/icon.ico
|
RC_ICONS = platforms/windows/icon.ico
|
||||||
|
|
||||||
|
|
||||||
include(../../src/windows.pri)
|
include(../../src/windows.pri)
|
||||||
}
|
}
|
||||||
|
|
|
||||||
|
|
@ -759,7 +759,7 @@
|
||||||
|
|
||||||
(defvar *history* (make-array 0 :adjustable t :fill-pointer t))
|
(defvar *history* (make-array 0 :adjustable t :fill-pointer t))
|
||||||
(defvar *history-index* nil)
|
(defvar *history-index* nil)
|
||||||
(defvar *history-file* ".repl-history")
|
(defvar *history-file* (merge-pathnames ".repl-history" (user-homedir-pathname)))
|
||||||
(defvar *max-history* 100)
|
(defvar *max-history* 100)
|
||||||
|
|
||||||
(defun read-saved-history ()
|
(defun read-saved-history ()
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue