From 4ae2c0777d52498fee4fa52d6cb0c2f2bdca741f Mon Sep 17 00:00:00 2001
From: Andrew McCallum <mccallum@gnu.org>
Date: Sat, 24 Feb 1996 16:40:17 +0000
Subject: [PATCH] ([Encoder +initialize]): Compare self with Encoder, not
 Coder. ([Encoder +encodeRootObject:withName:toStream:]): Rename method to
 -close. ([Encoder -encodeSelector:withName:name]): Use sel_get_any_typed_uid
 instead of sel_get_any_uid.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@995 72102866-910b-0410-8b05-ffd578937521
---
 Source/Encoder.m | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/Source/Encoder.m b/Source/Encoder.m
index 7501eb643..ba4351ec3 100644
--- a/Source/Encoder.m
+++ b/Source/Encoder.m
@@ -61,7 +61,7 @@ my_object_is_class(id object)
 
 + (void) initialize
 {
-  if (self == [Coder class])
+  if (self == [Encoder class])
     {
       /* This code has not yet been ported to machines for which
 	 a pointer is not the same size as an int. */
@@ -208,7 +208,7 @@ my_object_is_class(id object)
 {
   id c = [[self alloc] initForWritingToStream: stream];
   [c encodeRootObject: anObject withName: name];
-  [c closeCoding];
+  [c close];
   [c release];
   return YES;
 }
@@ -447,7 +447,8 @@ my_object_is_class(id object)
 #if 1 /* xxx Yipes,... careful... */
 	  /* xxx Think about something like this. */
 	  if (!sel_types)
-	    sel_types = sel_get_type (sel_get_any_uid (sel_get_name (sel)));
+	    sel_types = 
+	      sel_get_type (sel_get_any_typed_uid (sel_get_name (sel)));
 #endif
 	  if (!sel_name) [self error:"ObjC runtime didn't provide SEL name"];
 	  if (!*sel_name) [self error:"ObjC runtime didn't provide SEL name"];