#filter WebSafe #def databaseList($lst, $default, $onchange, $name, $id, $valueattr, $descattr) #end def #def cdromList($default="", $onchange=None) #filter None $databaseList(sorted($database.CDROM.query(), key=lambda x: x.description), default, onchange, 'cdrom', 'cdromlist', 'cdrom_id', 'description') #end filter #end def #def autoList($default="", $onchange=None) #filter None $databaseList(sorted($database.Autoinstall.query(), key=lambda x: x.description), default, onchange, 'autoinstall', 'autoinstalllist', 'autoinstall_id', 'description') #end filter #end def #def vmTypeList($default=None) #for $vmtype in (('linux-hvm', 'HVM'), ('linux', 'ParaVM'), ) #end for #end def #def addError(txt) #if $varExists('txt') #set global $error_text = $error_text + '----\n' + $txt #else #set global $error_text = $txt #end if #end def #def errorRow($value, $err) #if $err and $err.err_field == $value ${str($err)} #end if #end def #filter None $full_body #end filter #end filter