mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

Remove use of package local nicknames

Browse source
This commit is contained in:
David Botton 2021-11-05 13:25:42 -04:00
parent 0c5408f281
commit 8eb1bd753e
9 changed files with 32 additions and 32 deletions
Download patch file Download diff file Expand all files Collapse all files

3
source/clog-document.lisp
View file

@ -122,7 +122,8 @@ clog-document object. (Private)"))
(defgeneric set-title (clog-document value))
(defmethod set-title ((obj clog-document) value)
(execute obj (format nil "title='~A'" (cc:escape-string value))))
(execute obj
(format nil "title='~A'" (clog-connection:escape-string value))))
(defsetf title set-title)
;;;;;;;;;;;;;;;;;;