(defmethod initialize-instance :after ((obj blog-post) &key)The above is an interesting example of "aspect-oriented" programming!! Note the :after keyword and the typng of the argument.
"If :url-part wasn't non-nil when making the instance, generate it automatically."
cond ((eq nil (url-part obj))
(setf (url-part obj) (make-url-part (title obj))))))
I haven't had time to set this all up and follow along yet, perhaps next weekend will be quieter!!
Powered by ScribeFire.