Implemented selectedTag to work correctly

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gui/branches/testplant_1@28549 72102866-910b-0410-8b05-ffd578937521

ChangeLog

@@ -1,3 +1,7 @@
+2009-08-26 Douglas Simons <doug.simons@testplant.com>
+
+	* Source/NSPopUpButton.m: Implemented selectedTag to work correctly.
+
 2009-08-20 Douglas Simons <doug.simons@testplant.com>
 
 	* Source/GSLayoutManager.m: Fix bug with glyphRangeForCharacterRange:actualCharacterRange: 

Source/NSPopUpButton.m

@@ -251,6 +251,14 @@ this to return nil to indicate that we have no context menu.
   return [_cell indexOfSelectedItem];
 }
 
+/**<p>Returns the tag of the selected item</p>
+   <p>See Also: [NSPopUpButtonCell-indexOfSelectedItem]</p>
+ */
+- (int) selectedTag 
+{
+  return [[_cell selectedItem] tag];
+}
+
 - (void) selectItem: (id <NSMenuItem>)anObject
 {
   [self willChangeValueForKey: NSSelectedIndexBinding];