diff options
author | Colin Okay <okay@toyful.space> | 2022-02-08 13:47:11 -0600 |
---|---|---|
committer | Colin Okay <okay@toyful.space> | 2022-02-08 13:47:11 -0600 |
commit | 721e1bb6e6229c97ad10208df8b90f4fa0d306ba (patch) | |
tree | 53ff96fa8f74d9cabdb267d7a06ad5a067d3e97d /lazybones.lisp | |
parent | 10bb776b1c30ef41a8f5ae36c80924a3485dd1ff (diff) |
refactored lazybones:app function
Diffstat (limited to 'lazybones.lisp')
-rw-r--r-- | lazybones.lisp | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lazybones.lisp b/lazybones.lisp index 5f46a83..cf438cf 100644 --- a/lazybones.lisp +++ b/lazybones.lisp @@ -118,10 +118,8 @@ (defun app (&optional name) "Get the APP instance named by the symbol NAME. If NAME is not supplied, get the default app. Every package has at most one default -app, named with the package name." - (symbol-lazybones (or name - (intern (package-name *package*) *package*)) - nil)) +app, named with the package name. If no app can be found, return NIL" + (symbol-lazybones (or name (default-app-name)) nil)) (defclass endpoint () ((method |