I need to implement admin ui for role-based access. It involves
establishing many-to-many relationships with a simple scheme: three
tables: two for entities and one for relationships. I think this calls
for a widget. Ideally, widget would query all three tables and
construct a grid with entity names in columns and rows and check boxes
to establish/remove relationships. Here's concept code:

(defclass user ()
  ((name :accessor user-name)))

(defclass role ()
  ((name :accessor role-name)))

(defclass role-assignment ()
  ((user :accessor assigned-user)
   (role :accessor assigned-role)))

;;; Cross-check View
(defview role-assignment-view (:type cross-check :inherit-from '(:many-
to-many role-assignment)))

what do you think?

-- 
You received this message because you are subscribed to the Google Groups 
"weblocks" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to 
[email protected].
For more options, visit this group at 
http://groups.google.com/group/weblocks?hl=en.

Reply via email to