All pastes #363070 Raw Edit

Miscellany

public text v1 · immutable
·published 2007-02-19 05:29 UTC
rendered paste body
; We want to popular the listbox with entries from the contacts.lst file 
on *:dialog:addressbook:init:0: {
  var %i = 1
  while (%i <= $lines($scriptdirdata/contacts.lst)) {
    set %email.address. $+ %i $read($scriptdirdata/contacts.lst, %i)
    did -a addressbook 2 %email.address. $+ %i
    inc %i
  }
}