Commit 5adac01b authored by ryszard.szopa's avatar ryszard.szopa
Browse files

documentation

darcs-hash:812afbae3a8cc53c06f06068e6ee497b9fb3fe5d
parent a9ed5656
......@@ -184,7 +184,7 @@ and for each of classes, a method that retrieves list of instances of
second class. Mapping class has two slots, named `CLASS1-NAME' and
`CLASS2-NAME' that hold instances of first and second class.
The connection-spec is taken from class1."
The connection-spec specifies the connection to be used with the link table."
(let ((table-name (intern (format nil "~A-~A" class1-name class2-name)))
(class1-method-name class2-name)
(class2-method-name class1-name))
......
......@@ -59,9 +59,9 @@ names is used."))
(restart-case (error err)
(fix-it () :report "Add the column to the
table. (Note that allocate-instance the changes for one table are done in a
transaction, so if at any time you choose abort the changes will be
reverted.)"
table. (Note that allocate-instance the changes for one table are done
in a transaction, so if at any time you choose abort the changes will
be reverted.)"
(postmodern:execute (format nil "ALTER TABLE ~A ADD COLUMN ~A ~A;"
(sql-ize (table-name err)) (column-name err) (column-type err))))
(ignore () ())))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment