"name, description, privileges
 name=aString
 description=aString
 privileges=aSwikiSecurityPrivileges"
| values value |
values _ OrderedCollection new.
"Deny All"
value _ Array new: 3.
value
	at: 1 put: 'Deny All';
	at: 2 put: 'No access to the site at all';
	at: 3 put: (SwikiSecurityPrivileges named: 'Deny All' default: false).
values add: value.
"Read Only"
value _ Array new: 3.
value
	at: 1 put: 'Read Only';
	at: 2 put: 'Only able to view the site';
	at: 3 put: ((SwikiSecurityPrivileges named: 'Read Only' default: true)
		addAddress: 'append.page';
		addAddress: 'upload.page';
		addAddress: 'attach.page';
		addAddress: 'edit.page';
		addAddress: 'lock.page';
		addAddress: 'new.page';
		addAddress: 'save.page';
		addAddress: 'render.book';
		yourself).
values add: value.
"Read & Append"
value _ Array new: 3.
value
	at: 1 put: 'Append';
	at: 2 put: 'Able to view the site and use append areas.';
	at: 3 put: ((SwikiSecurityPrivileges named: 'Append' default: true)
		addAddress: 'upload.page';
		addAddress: 'attach.page';
		addAddress: 'edit.page';
		addAddress: 'lock.page';
		addAddress: 'new.page';
		addAddress: 'render.book';
		addAddress: 'save.page';
		yourself).
values add: value.
"Write"
value _ Array new: 3.
value
	at: 1 put: 'Write';
	at: 2 put: 'Able to edit pages, but cannot upload files or (un)lock pages.';
	at: 3 put: ((SwikiSecurityPrivileges named: 'Write' default: true)
		addAddress: 'upload.page';
		addAddress: 'attach.page';
		addAddress: 'lock.page';
		addAddress: 'render.book';
		yourself).
values add: value.
"Allow All"
value _ Array new: 3.
value
	at: 1 put: 'Allow All';
	at: 2 put: 'Able to do anything';
	at: 3 put: (SwikiSecurityPrivileges named: 'Allow All' default: true).
values add: value.
values