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

space
space

backupAllSites

backupOneSite

space

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.backups.backupAllSites

Fix a bug that occurs when a site has been scheduled for backup but it is not available when a backup is done. Without this fix the whole backup terminates, with the patch an unavailable site is skipped.

on backupAllSites ()
  «Changes
 unaltered lines omitted
  local (adrsites = @config.manila.backups.sites)
  local (backupFolder = config.manila.backups.backupFolder)
  local (adr, data, ctsites = 0)
  new (tabletype, @data)
  for adr in adrsites //do the backups
  if adr^.flEnabled
  local (adrsite = adr^.adrsite) //03/03/06, 11:18:45 by DAB
  if not defined (adrsite^) //03/03/06, 11:18:48 by DAB: skip undefined sites
  continue
  ctsites++
  local (adrdata = @data.[adrsite] )
  new (tableType, adrdata)
  local (sitename = nameOf (adrsite^))
  try {sitename = manilaSuite.getNewsSitePref ("siteName", adrsite)}
  adrdata^.sitename = sitename
  adrdata^.siteurl = manilaSuite.getSiteUrl (adrsite)
  try
 unaltered lines omitted
  else
 unaltered lines omitted
 
  if ctsites > 0 //send email notification
 unaltered lines omitted
 
  return (true)
«bundle //test code
  «backupAllSites ()

Relative to Frontier version 9.7b10