diff options
| author | jingham <jingham> | 2000-02-10 09:59:10 (GMT) |
|---|---|---|
| committer | jingham <jingham> | 2000-02-10 09:59:10 (GMT) |
| commit | d277943d8c72ac92baf1c2ed6b0cb7c7f1339318 (patch) | |
| tree | 9f1fdb2d8accdb419a53ee63f9bde6cb38f49e9b /mac/tclMacLibrary.c | |
| parent | 7f5e420c3e6cba41b5e710be95437aa5acaf4712 (diff) | |
| download | tcl-d277943d8c72ac92baf1c2ed6b0cb7c7f1339318.zip tcl-d277943d8c72ac92baf1c2ed6b0cb7c7f1339318.tar.gz tcl-d277943d8c72ac92baf1c2ed6b0cb7c7f1339318.tar.bz2 | |
Remove need for "OLDROUTINENAMES" def'n in one more file...
Diffstat (limited to 'mac/tclMacLibrary.c')
| -rw-r--r-- | mac/tclMacLibrary.c | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/mac/tclMacLibrary.c b/mac/tclMacLibrary.c index 99fdf72..989329f 100644 --- a/mac/tclMacLibrary.c +++ b/mac/tclMacLibrary.c @@ -13,14 +13,12 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclMacLibrary.c,v 1.3 1999/08/15 04:03:52 jingham Exp $ + * RCS: @(#) $Id: tclMacLibrary.c,v 1.4 2000/02/10 09:59:10 jingham Exp $ */ /* * Here is another place that we are using the old routine names... */ - -#define OLDROUTINENAMES 1 #include <CodeFragments.h> #include <Errors.h> @@ -171,9 +169,9 @@ OpenLibraryResource( OSErr err = noErr; - if (realInitBlkPtr->fragLocator.where == kOnDiskFlat) { + if (realInitBlkPtr->fragLocator.where == kDataForkCFragLocator) { fileSpec = realInitBlkPtr->fragLocator.u.onDisk.fileSpec; - } else if (realInitBlkPtr->fragLocator.where == kOnDiskSegmented) { + } else if (realInitBlkPtr->fragLocator.where == kResourceCFragLocator) { fileSpec = realInitBlkPtr->fragLocator.u.inSegs.fileSpec; } else { err = resFNotFound; |