From 18b942aede07662f99b39aa5ede3554463fa1ac3 Mon Sep 17 00:00:00 2001
From: nico <nico@72102866-910b-0410-8b05-ffd578937521>
Date: Sat, 30 Oct 1999 02:11:27 +0000
Subject: [PATCH] Added NSOpenPanel

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gui/trunk@5103 72102866-910b-0410-8b05-ffd578937521
---
 Model/GMAppKit.m | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

diff --git a/Model/GMAppKit.m b/Model/GMAppKit.m
index 974a33661..e15379af0 100644
--- a/Model/GMAppKit.m
+++ b/Model/GMAppKit.m
@@ -1340,6 +1340,26 @@ void __dummy_GMAppKit_functionForLinking() {}
 
 @end  /* NSSavePanel (GMArchiverMethods) */
 
+@implementation NSOpenPanel (GMArchiverMethods)
+
+- (void)encodeWithModelArchiver:(GMArchiver*)archiver
+{
+  [super encodeWithModelArchiver:(GMArchiver*)archiver];
+  [archiver encodeBOOL:[self canChooseFiles] 
+	    withName:@"canChooseFiles"];
+  [archiver encodeBOOL:[self canChooseDirectories] 
+	    withName:@"canChooseDirectories"];
+}
+
+- (id)initWithModelUnarchiver:(GMUnarchiver *)unarchiver
+{
+  [super initWithModelUnarchiver:(GMUnarchiver *)unarchiver];
+  [self setCanChooseFiles:[unarchiver decodeBOOLWithName:@"canChooseFiles"]];
+  [self setCanChooseDirectories:[unarchiver decodeBOOLWithName:
+					      @"canChooseDirectories"]];
+  return self;
+}
+@end  /* NSOpenPanel (GMArchiverMethods) */
 
 @implementation NSBrowser (GMArchiverMethods)