DL_UpdateBkgndList

Revision
Revised on

Description

Code

on DL_UpdateBkgndList
  global DL_BkgndWindow,DL_BkgndList,DL_BkgndCount
  
  get the number of bkgnds
  if (DLBkgndList is empty) or (it  DL_BkgndCount) then
    put empty into DL_BkgndList
    put it into DL_BkgndCount
    repeat with n = 1 to it
      set cursor to busy
      put (the short name of bkgnd n) & return after DL_BkgndList
    end repeat
  end if
  
end DL_UpdateBkgndList