11 lines
367 B
EmacsLisp
11 lines
367 B
EmacsLisp
;;; 02-linuxplus-save-lesson-history.el --- linuxplus-save-lesson-history
|
|
|
|
(defun linuxplus-save-lesson-history ()
|
|
"Save lesson history to disk."
|
|
(with-temp-file linuxplus-lesson-history-file
|
|
(prin1 `(setq linuxplus-lesson-history ',linuxplus-lesson-history)
|
|
(current-buffer))
|
|
(insert "\n")))
|
|
|
|
;;; 02-linuxplus-save-lesson-history.el ends here
|