From f6326c7783bcc115ef74131e7eef12105468cf45 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Sat, 15 Oct 2022 11:44:22 -0500 Subject: Fix: name clash --- lazybones.asd | 2 +- lazybones.lisp | 4 ++-- package.lisp | 2 +- 3 files changed, 4 insertions(+), 4 deletions(-) diff --git a/lazybones.asd b/lazybones.asd index 77a7924..bd56d95 100644 --- a/lazybones.asd +++ b/lazybones.asd @@ -4,7 +4,7 @@ :description "http route handling" :author "Colin Okay " :license "AGPLv3" - :version "0.10.0" + :version "0.10.1" :serial t :depends-on (#:alexandria #:str diff --git a/lazybones.lisp b/lazybones.lisp index d15af33..1738c00 100644 --- a/lazybones.lisp +++ b/lazybones.lisp @@ -148,11 +148,11 @@ supplied, get the default app. Every package has at most one default app, named with the package name. If no app can be found, return NIL" (symbol-lazybones (or name (default-app-name)) nil)) -(defun app-dict (key &optional name) +(defun dictionary (key &optional name) "Get value from the application dict" (gethash key (app-dict (app name)))) -(defun (setf app-dict) (new key &optional name) +(defun (setf dictionary) (new key &optional name) "Set a value in the application dict." (setf (gethash key (app-dict (app name))) new)) diff --git a/package.lisp b/package.lisp index 8c65afd..1a6e7bc 100644 --- a/package.lisp +++ b/package.lisp @@ -82,5 +82,5 @@ #:drop-definition #:add-class-to-definitions #:ext->mimetype - #:app-dict)) + #:dictionary)) -- cgit v1.2.3