|
From: <cre...@us...> - 2006-07-04 07:45:51
|
Revision: 1444 Author: creecode Date: 2006-07-04 00:45:48 -0700 (Tue, 04 Jul 2006) ViewCVS: http://svn.sourceforge.net/frontierkernel/?rev=1444&view=rev Log Message: ----------- FSRef-ized Modified Paths: -------------- Frontier/branches/FSRef_Migration/Common/source/dbverbs.c Modified: Frontier/branches/FSRef_Migration/Common/source/dbverbs.c =================================================================== --- Frontier/branches/FSRef_Migration/Common/source/dbverbs.c 2006-07-04 07:43:44 UTC (rev 1443) +++ Frontier/branches/FSRef_Migration/Common/source/dbverbs.c 2006-07-04 07:45:48 UTC (rev 1444) @@ -477,6 +477,8 @@ if (!getfilespecvalue (hparam1, pnum, ptrfs)) return (false); + ( void ) extendfilespec ( ptrfs, ptrfs ); + for (hodb = hodblist; hodb != nil; hodb = (**hodb).hnext) { if ( equalfilespecs ( &( **hodb ).fs, ptrfs ) ) { @@ -523,7 +525,8 @@ } return (true); - } /*getodbvalue*/ + + } // getodbvalue static boolean dbclosefile (hdlodbrecord hodb) { @@ -672,10 +675,11 @@ return (false); } - + listlink ((hdllinkedlist) hodblist, (hdllinkedlist) hodb); return (setbooleanvalue (true, vreturned)); + } // dbopenverb This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |