From a98ff164f1db04bf5c8c34623c4b1775d71de292 Mon Sep 17 00:00:00 2001
From: richard <richard@72102866-910b-0410-8b05-ffd578937521>
Date: Tue, 25 May 1999 02:34:47 +0000
Subject: [PATCH] Fix for save panel

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gui/trunk@4286 72102866-910b-0410-8b05-ffd578937521
---
 ChangeLog          | 4 ++++
 Model/GMArchiver.m | 8 ++++++++
 2 files changed, 12 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 10f961bcd..50e47a8a5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Yue May 25  3:55:00 1999  Richard Frith-Macdonald <richard@brainstorm.co.uk>
+
+	* Source/Model/GMArchiver.m: Fix for save panels by Jonathan Gapen.
+
 1999-05-18  Adam Fedor  <fedor@gnu.org>
 
 	* Headers/gnustep/gui/DPSOperators: New graphics extensions
diff --git a/Model/GMArchiver.m b/Model/GMArchiver.m
index d387fd2e8..5d5e04eac 100644
--- a/Model/GMArchiver.m
+++ b/Model/GMArchiver.m
@@ -30,6 +30,7 @@
 #import <Foundation/NSArray.h>
 #import <Foundation/NSDictionary.h>
 #import <Foundation/NSData.h>
+#import <Foundation/NSDebug.h>
 #import <Foundation/NSObjCRuntime.h>
 #import <Foundation/NSEnumerator.h>
 #import <Foundation/NSScanner.h>
@@ -645,6 +646,7 @@ static NSMutableDictionary* classToAliasMappings = nil;
   BOOL objectOnTopLevel = NO;
   id newObject;
   Class class;
+  NSString* decodeAsName;
 
   if (!name)
     return nil;
@@ -715,6 +717,12 @@ static NSMutableDictionary* classToAliasMappings = nil;
 
   /* Create the object */
   className = [representation objectForKey:@"isa"];
+  decodeAsName = [classToAliasMappings objectForKey:className];
+  if( decodeAsName )
+  {
+    NSDebugLLog(@"GMArchiver", @"%@ to be decoded as %@", className, decodeAsName);
+    className = decodeAsName;
+  }
   class = NSClassFromString(className);
   object = [class createObjectForModelUnarchiver:self];