jadedctrl/ flora-search-aurora
1
0
Disbranĉigi 0
Fontkodo Issues Tirpetoj Eldonoj 1 Activity

Rename FLORA-SEARCH-AURORA.UI → […].MENU

This commit is contained in:
Jaidyn Ann 2023-07-02 12:05:29 -05:00
parent 1d30f66df4
commit e26986218b
3 changed files with 5 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
flora-search-aurora.asd
View File

@ -2,13 +2,12 @@
:depends-on ("alexandria" "assoc-utils" "cl-charms" "str") :depends-on ("alexandria" "assoc-utils" "cl-charms" "str")
:build-operation "program-op" :build-operation "program-op"
:build-pathname "flora-search-aurora" :build-pathname "flora-search-aurora"
:entry-point "flora-search-aurora:main" :entry-point "flora-search-aurora:main"
:components ((:file "packages") :components ((:file "packages")
(:file "util") (:file "util")
(:file "display") (:file "display")
(:file "input") (:file "input")
(:file "ui") (:file "menu")
(:file "inventory") (:file "inventory")
(:file "intermission") (:file "intermission")
(:file "overworld.util") (:file "overworld.util")

4
ui.lisp → menu.lisp
View File

@ -17,7 +17,7 @@
;;;; Generic menu-making, displaying, and management. ;;;; Generic menu-making, displaying, and management.
;;;; Let's get to it, we're on a deadline! ;;;; Let's get to it, we're on a deadline!
(in-package :flora-search-aurora.ui) (in-package :flora-search-aurora.menu)
;;; ——————————————————————————————————— ;;; ———————————————————————————————————
@ -40,8 +40,6 @@ A state-function for use with the #'state-loop."
(defun menu-state-draw (matrix menu-alist) (defun menu-state-draw (matrix menu-alist)
"Render a menu in menu-alist format to the given matrix. "Render a menu in menu-alist format to the given matrix.
A core part of #'menu-state." A core part of #'menu-state."
;; (intermission::render-clock-base matrix (list :x 0 :y 0))
(✎:render-string matrix "daddy is dead anmd I hate him" '(:x 20 :y 10) :width 15 :char-count 18)
(render-menu-strip matrix menu-alist 0 0)) (render-menu-strip matrix menu-alist 0 0))

6
packages.lisp
View File

@ -43,8 +43,8 @@
#:render-fill-rectangle #:render-fill-rectangle
#:hide-cursor #:show-cursor #:clear-screen)) #:hide-cursor #:show-cursor #:clear-screen))
(defpackage :flora-search-aurora.ui (defpackage :flora-search-aurora.menu
(:nicknames :fsa.u :ui :📋) (:nicknames :fsa.men :menu :📋)
(:use :cl) (:use :cl)
(:export #:menu-state #:make-menu-state (:export #:menu-state #:make-menu-state
:label :selection :selected)) :label :selection :selected))
@ -101,4 +101,4 @@
(:use :cl (:use :cl
:flora-search-aurora.input :flora-search-aurora.display :flora-search-aurora.input :flora-search-aurora.display
:flora-search-aurora.overworld :flora-search-aurora.dialogue :flora-search-aurora.overworld :flora-search-aurora.dialogue
:flora-search-aurora.ui)) :flora-search-aurora.menu))