Misc Cleanups.

[clinton/lisp-on-lines.git] / src / packages.lisp

diff --git a/src/packages.lisp b/src/packages.lisp
index 54a34af..e456cf0 100644 (file)
--- a/src/packages.lisp
+++ b/src/packages.lisp
@@ -10,10 +10,12 @@
 
    
 ;; Descriptions
 
    
 ;; Descriptions

-   #:find-description
+   #:*description*
+   #:find-description   

    #:description-of
    #:define-description
    #:described-object
    #:description-of
    #:define-description
    #:described-object

+   #:with-described-object

    #:described-class
    #:described-standard-class
    #:with-active-descriptions
    #:described-class
    #:described-standard-class
    #:with-active-descriptions


@@ -24,6 +26,7 @@
    #:define-display
    #:display
    #:display-using-description
    #:define-display
    #:display
    #:display-using-description

+   #:display-attribute-label

    #:*display*
    #:*object*
    
    #:*display*
    #:*object*
    


@@ -33,6 +36,8 @@
    #:attributes
    #:attribute-object
    #:attribute-label
    #:attributes
    #:attribute-object
    #:attribute-label

+   #:attribute-delimiter
+   #:attribute-slot-name

    #:label
    #:attribute-function
    #:attribute-value
    #:label
    #:attribute-function
    #:attribute-value