[Bese-devel] a minor typo fix
Aleksandar Bakic
a_bakic at yahoo.com
Sat Aug 27 22:42:27 UTC 2005
This seems to be one correct way:
diff -rN old-ucw_dev/src/yaclml/ucw-tags.lisp
new-ucw_dev/src/yaclml/ucw-tags.lisp
41c41
< (set-action-parameter
---
> (set-action-parameter this.form
62,63c62,63
< `(defun set-action-paramater (value)
< (setf (slot-value (aref this.form ,',+action-parameter-name+)
'value)
---
> `(defun set-action-parameter (form value)
> (setf (slot-value (slot-value form ,(intern
+action-parameter-name+)) 'value)
102c102,103
< (set-action-parameter
,(register-action---
> (set-action-parameter this.form
> ,(register-action
166c167
< (set-action-parameter ,(make-new-action
(context.current-frame *context*)
---
> (set-action-parameter this.form ,(make-new-action
(context.current-frame *context*)
Alex
__________________________________
Yahoo! Mail
Stay connected, organized, and protected. Take the tour:
http://tour.mail.yahoo.com/mailtour.html
More information about the bese-devel
mailing list