space Baylys
Just practicing to pass the Turing test.
space
space
space
space
Developer for Hire!
space
addedValues Plugin
space

Home

What's new

Bayly.Root

Cornershop Plugin

Career

edutools Root

Enhancements

Interests

linguist Plugin

Manila

Patches

space

mainresponder

manilaData

manilamacros

manilaSuite

space
space

admin

backups

discuss

gems

getCanonicalSiteName

hierarchyPage

hosting

html

mail

member

members

news

space
space

memberMayCreateNewItems

space

plugins

prefs

referer

renderNewsPage

rpcHandlers

rpcUtils

search

sendMail

siteStructure

staticRendering

storyList

space

system

Patches by Group

Papers

Sales

Sign My Guestbook

User(land) Relations.

Contact Address

Search Baylys

urlchains

space
Join Now
Login
space space space

manilaSuite.news.memberMayCreateNewItems

Content editors need to be able to create news items

on memberMayCreateNewItems (pta=nil, adrSite=nil, adrMember=nil)
  «Return true if the member may create news items.
 unaltered lines omitted
  «Changes:
 unaltered lines omitted
 
  local (flManagingEditor, flContentEditor, flEditor, flMember)
  if adrSite == nil //assume we're being called from the website framework context (if pta == nil)
 unaltered lines omitted
  else //we're being called from an RPC handler or some other script
 unaltered lines omitted
  local (adrNewsSite = manilaSuite.getNewsSiteAddress (adrSite))
 
 
  if not flMember //must at least be a member
 unaltered lines omitted
  if flManagingEditor //MEs are always allowed
 unaltered lines omitted
 
  «Check content editors.
  if flContentEditor
 unaltered lines omitted
 
  «Check contributing editors.
  if flEditor
 unaltered lines omitted
 
  «Check members.
  if defined (adrNewsSite^.newsItems.access.flMembersCreate)
 unaltered lines omitted
 
  return (false)

Relative to Frontier version 9.7b10