View/Edit #1432:description

Name(s): description

1:  "Choose a random font and prepend it to the text."
2:  files = {}
3:  for file in (this:filelist())
4:    if (length(file) > 4 && file[$ - 3..$] == ".txt")
5:      files = {@files, file}
6:    endif
7:  endfor
8:  file = files[random($)]
9:  text = this:fileread(file)
10: font = tostr("[Font: ", file[1..$ - 4], "]")
11: return {font, @$html_utils:literal_text(text), @pass(@args)}
12: "Last modified by Dax (#789) on Sat Nov  9 13:04:32 2002 MST."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: DT_Landlady (#9799)

You are not logged in.