manilaSuite.staticRendering.displayRenderButton

on displayRenderButton (pta=nil)

«Changes:

unaltered lines omitted

if pta == nil

unaltered lines omitted

bundle //check the various reasons not to display a button

if pta^.flPrintFriendlyTemplate //PBS 09/28/01: print-friendly template support

unaltered lines omitted

if not (manilaSuite.editors.managingEditorTest (pta)) //must be ME

unaltered lines omitted

if manilaSuite.staticRendering.isStaticRendering () //don't display if this is a static rendering that's going on

unaltered lines omitted

if not (manilaSuite.staticRendering.isEnabled (pta^.adrSiteRootTable)) //static rendering must be enabled

unaltered lines omitted

if not (manilaSuite.getNewsSitePref ("flStaticRenderingButton", default:false, flCreate:true)) //the site must want a render this page button

unaltered lines omitted

if manilaMacros.pathAtt("noStaticREnder", false, true) «inherited path attribute 7/29/06, 1:12:49 PM by DAB

return ("")

local (relativePath, flRenderable = false)

bundle //determine if this is a render-able page and get the path

if not (flRenderable)

unaltered lines omitted

bundle //handle actually rendering the page, if this is a post

local (htmlText)

on add (s)

unaltered lines omitted

add ("<form method=\"post\" action=\"" + pta^.uri + "\" name=\"renderThisPageForm\">\r")

add ("<input type=\"submit\" value=\"" + manilaSuite.getString ("admin.renderThisPageButton") + "\" name=\"renderThisPage\">\r")

add ("</form>\r")

return (manilaSuite.unTaint (htmlText))

Relative to Frontier version 9.7b10