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

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.renderNewsPage

Fix invalid HTML in the link tage generated for RSS.

on renderNewsPage (msgNum, flShowFlipButton=false, pta=nil)
  «Render a news page.
  «Changes:
 unaltered lines omitted
 
  if pta == nil
 unaltered lines omitted
 
  try //12/13/02 JES: add <link> tag with the rsd.xml URL to pta^.meta
 unaltered lines omitted
  try //05/31/02 JES: add <link> tag with the RSS URL to pta^.meta
 unaltered lines omitted
  try //04/04/03 JES: add <link> tag with the URL of mySubscriptions.opml to pta^.meta
 unaltered lines omitted
 
  bundle //render news items if the pref is turned on
 
  on untaint (adrText) //PBS 03/14/01: local routine; avoid string copy
 unaltered lines omitted
 
  local (adrRoot = mainResponder.discuss.openRoot (pta)) //PBS 06/20/00: use this in subsequent calls to get the address of a message table
  local (msgTable = mainResponder.discuss.getMessageTable (msgNum, pta, adrRoot)) //PBS 06/20/00: send adrRoot parameter since it's available
  local (flByline = true)
  local (htmlText = "", indentLevel = 0)
  local (calendarHtml = "")
  local (flPost = (pta^.method == "POST"))
  local (now = clock.now ())
  local (newsHomeUrl = pta^.urls^.newsHome); untaint (@newsHomeUrl)
  local (flStaticRendering = manilaSuite.staticRendering.isStaticRendering (pta)) //PBS 6/14/00: call once at top of script instead of once for each news day
  local (flManagingEditor = pta^.flManagingEditor) //is this the managing editor?
  local (adrNewsSite = pta^.newsSite)
 
  on add (s)
 unaltered lines omitted
  on isDeleted (adrMsgTable) //PBS 03/14/01: optimization -- local routine
 unaltered lines omitted
 
  pta^.title = msgTable^.subject; untaint (@pta^.title) //the title comes from the dg message table
  if isDeleted (msgTable) //PBS 12/13/99: no title if message has been deleted
 unaltered lines omitted
  bundle //the editor may not want a title to appear on the home page
 
  bundle //add a meta tag
 
  bundle //get the postTime and lastUpdate time for this page
 
  bundle //determine whether or not to display a byline
 
  if flManagingEditor and flPost //update the home page text, build the static page
 unaltered lines omitted
 
  bundle //display the current news and calendar if turned on
 
  pta^.calendar = calendarHtml //PBS 8/10/99
 
  return (htmlText)

Relative to Frontier version 9.7b10