|
From: creedon <icr...@us...> - 2005-09-05 16:02:35
|
Update of /cvsroot/frontierkernel/odbs/mainResponderRoot/mainResponder/discuss In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19156 Modified Files: deleteMessage Log Message: added inResponseToOld Index: deleteMessage =================================================================== RCS file: /cvsroot/frontierkernel/odbs/mainResponderRoot/mainResponder/discuss/deleteMessage,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** deleteMessage 26 Mar 2005 21:45:33 -0000 1.1.1.1 --- deleteMessage 5 Sep 2005 16:02:27 -0000 1.2 *************** *** 1,3 **** FrontierVcsFile:1:scpt:mainResponder.discuss.deleteMessage ! on deleteMessage (msgNum, adrRoot=nil) { ÇDelete a message in a discussion group. Just mark its storage deleted, leave it in the tree. ÇChanges: Ç06/01/00; 5:31:30 PM by PBS ÇadrRoot is a new optional parameter. It's the address of the discussion group to use. Pass this parameter when calling this script from outside a website framework rendering context -- otherwise this script will delete a message in the wrong discussion group. local (adrMsgTable = mainResponder.discuss.getMessageTable (msgNum, adrRoot:adrRoot)); adrMsgTable^.flDeleted = true; adrMsgTable^.inResponseTo = -2; return (adrMsgTable)} \ No newline at end of file --- 1,3 ---- FrontierVcsFile:1:scpt:mainResponder.discuss.deleteMessage ! on deleteMessage (msgNum, adrRoot=nil) { ÇDelete a message in a discussion group. Just mark its storage deleted, leave it in the tree. ÇChanges Ç8/2/05; 8:39:55 PM by TAC Çadded inResponseToOld Ç06/01/00; 5:31:30 PM by PBS ÇadrRoot is a new optional parameter. It's the address of the discussion group to use. Pass this parameter when calling this script from outside a website framework rendering context -- otherwise this script will delete a message in the wrong discussion group. local (adrMsgTable = mainResponder.discuss.getMessageTable (msgNum, adrRoot: adrRoot)); adrMsgTable^.flDeleted = true; adrMsgTable^.inResponseToOld = adrMsgTable^.inResponseTo; adrMsgTable^.inResponseTo = -2; return (adrMsgTable)} \ No newline at end of file |