: INSERT INTO : msg : SET : msg_title = ${mysql::cgi.param.msg_title}, : msg_text = ${mysql::cgi.param.msg_text}, : user_id = $userid ); sql(db, <:SQL> : INSERT INTO : msg_queue : SET : msg_id = last_insert_id(), : queue_id = $q.qid ); case action ~== "update": if (not (isadmin or q.userid == userid)) panic "Security ERROR!"; sql(db, <:SQL> : UPDATE : queue : SET : queue_title = ${mysql::cgi.param.update_title}, : queue_text = ${mysql::cgi.param.update_text} : WHERE : queue_id = $q.qid ); case action ~== "discard": if (not (isadmin or q.userid == userid)) panic "Security ERROR!"; if (sql_value(db, "SELECT count(*) FROM patch WHERE queue_id = $q.qid AND patch_status = 'O'") != 0) panic "Security ERROR!"; sql(db, <:SQL> : UPDATE : queue : SET : queue_discarded = 1 : WHERE : queue_id = $q.qid ); return "Queue #$q.qid discarded."; } } var q = sql_tuple(db, <:SQL> : SELECT : q.queue_id AS id, : q.queue_title AS title, : q.queue_text AS text, : q.user_id_owner AS userid : FROM : queue AS q : WHERE : queue_id = ${mysql::queue_id} ); if (q.title !~ /\S/) q.title = ""; if (q.text !~ /\S/) q.text = ""; ?>

${xml::q.text}

SELECT msg.msg_title AS title, msg.msg_text AS text, user.user_name AS username FROM msg, msg_queue, user WHERE msg_queue.queue_id = ${mysql::queue_id} AND msg_queue.msg_id = msg.msg_id AND msg.user_id = user.user_id ORDER BY msg.msg_id ); ?> :

by ${xml::m.username}

${smtext::m.title}

${smtext::m.text}

This queue is owned by: $owner
Patches in this queue: $po open, $pc closed

: :