[Logicampus-cvs] logicampus/src/logicreate/services/forum/admin main.lcp, 1.1.1.1, 1.2

[Mark K <har...@us...>]

Update of /cvsroot/logicampus/logicampus/src/logicreate/services/forum/admin
In directory sc8-pr-cvs6.sourceforge.net:/tmp/cvs-serv22058/admin

Modified Files:
	main.lcp 
Log Message:
Change function "next_record" to "nextRecord".

Index: main.lcp
===================================================================
RCS file: /cvsroot/logicampus/logicampus/src/logicreate/services/forum/admin/main.lcp,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** main.lcp	21 Nov 2003 23:14:10 -0000	1.1.1.1
--- main.lcp	8 Oct 2007 14:26:07 -0000	1.2
***************
*** 24,29 ****
  
  		$db->query("select * from forums");
! 		while($db->next_record()) { 
! 			extract($db->Record);
  
  // make the action tags (edit/del)
--- 24,29 ----
  
  		$db->query("select * from forums");
! 		while($db->nextRecord()) { 
! 			extract($db->record);
  
  // make the action tags (edit/del)
***************
*** 52,59 ****
  
  // pull record into vars
! 		@extract($db->Record);
  		
  // put general data into template
! 		$t = $db->Record;
  
  // deal with perms
--- 52,59 ----
  
  // pull record into vars
! 		@extract($db->record);
  		
  // put general data into template
! 		$t = $db->record;
  
  // deal with perms
***************
*** 67,72 ****
  
  		$db->query("select * from forumPerms where fid='$fid'");
! 		while($db->next_record()) {
! 			$perm[$db->Record["groups"]][$db->Record["perm"]] = true;
  		}
  		while(list($k,$v) = each($grouplist)) { 
--- 67,72 ----
  
  		$db->query("select * from forumPerms where fid='$fid'");
! 		while($db->nextRecord()) {
! 			$perm[$db->record["groups"]][$db->record["perm"]] = true;
  		}
  		while(list($k,$v) = each($grouplist)) {