From 050eaff97be6b1083078127396b4dd9b0a498f77 Mon Sep 17 00:00:00 2001
From: Fabien Vallon <fabien@sonappart.net>
Date: Tue, 12 Jul 2005 15:41:47 +0000
Subject: [PATCH] Add minimum column size for NSBrowser inspector ( improve it
 with a slider ? )

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/gorm/trunk@21460 72102866-910b-0410-8b05-ffd578937521
---
 Palettes/3Containers/inspectors.m | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/Palettes/3Containers/inspectors.m b/Palettes/3Containers/inspectors.m
index 8e3a2bc6..18bd7031 100644
--- a/Palettes/3Containers/inspectors.m
+++ b/Palettes/3Containers/inspectors.m
@@ -50,6 +50,7 @@
 {
   id optionMatrix;
   id tagField;
+  id minColumnWidth;
 }
 
 - (void) _getValuesFromObject: (id)anObject;
@@ -88,6 +89,10 @@
     {
       [object setTag:[[tagField cellAtIndex:0] intValue]];
     }
+  else if ( control == minColumnWidth ) 
+    {
+      [object setMinColumnWidth:[minColumnWidth intValue]];
+    }
 }
 
 - (void) _getValuesFromObject: anObject
@@ -113,6 +118,7 @@
     [optionMatrix selectCellAtRow: 5 column: 0];
   
   [[tagField cellAtIndex:0] setIntValue:[anObject tag]];
+  [minColumnWidth setStringValue:[NSString stringWithFormat:@"%i",[anObject minColumnWidth]]];
 }
 
 - (id) init