xowiki::utility proc publish_status_next_state (private)

 xowiki::utility publish_status_next_state publish_status

Defined in /var/www/openacs.org/packages/xowiki/tcl/xowiki-utility-procs.tcl

Determine next publish status and return dict containing CSSclass and next state.

Parameters:

publish_status (required)

Testcases:

No testcase defined.

Source code:

if {$publish_status eq "ready"} {
  set CSSclass green
  set state "production"
} elseif {$publish_status eq "expired"} {
  set CSSclass black
  set state "production"
} else {
  set CSSclass red
  set state "ready"
}
return [list CSSclass $CSSclass state $state]

XQL Not present:

Generic, PostgreSQL, Oracle