mirror of
https://gitlab.com/eql/lqml.git
synced 2025-12-06 10:31:34 -08:00
33 lines
813 B
Common Lisp
33 lines
813 B
Common Lisp
;;; keep sorted to recognize eventual name clashes
|
|
|
|
(defpackage ui
|
|
(:use :cl)
|
|
(:export
|
|
#:*busy*
|
|
#:*edit*
|
|
#:*group*
|
|
#:*loading*
|
|
#:*main-view*
|
|
#:*messages*
|
|
#:*message-view*
|
|
#:*modem*
|
|
#:*radios*
|
|
#:*region*
|
|
#:*toast*
|
|
#:*unread-messages*))
|
|
|
|
(in-package :ui)
|
|
|
|
(defparameter *busy* "busy")
|
|
(defparameter *edit* "edit")
|
|
(defparameter *group* "group")
|
|
(defparameter *loading* "loading")
|
|
(defparameter *main-view* "main_view")
|
|
(defparameter *messages* "messages")
|
|
(defparameter *message-view* "message_view")
|
|
(defparameter *modem* "modem")
|
|
(defparameter *radios* "radios")
|
|
(defparameter *region* "region")
|
|
(defparameter *toast* "toast")
|
|
(defparameter *unread-messages* "unread_messages")
|
|
|