From 0d4603f2d40eb209a9dfd69286dafaec6c2e1b54 Mon Sep 17 00:00:00 2001
From: "akkana%netscape.com"
 <akkana%netscape.com@18797224-902f-48f8-a5cc-f745e15eee43>
Date: Mon, 3 Aug 1998 20:49:30 +0000
Subject: [PATCH] Add new option menu convenience routine:
 fe_get_current_attribute_option

git-svn-id: svn://10.0.0.236/trunk@7136 18797224-902f-48f8-a5cc-f745e15eee43
---
 mozilla/cmd/xfe/src/Menu.cpp | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/mozilla/cmd/xfe/src/Menu.cpp b/mozilla/cmd/xfe/src/Menu.cpp
index 008608e7561..3504d473310 100644
--- a/mozilla/cmd/xfe/src/Menu.cpp
+++ b/mozilla/cmd/xfe/src/Menu.cpp
@@ -1140,3 +1140,27 @@ fe_set_current_attribute_option(Widget parent, int btnPos )
    return False;
 }
 
+extern "C" Widget
+fe_get_current_attribute_option(Widget option)
+{
+   if ( XmIsRowColumn(option) )
+   {
+     unsigned char type;
+     Widget pulldownW;
+     XtVaGetValues(option,
+                   XmNrowColumnType, &type,
+                   XmNsubMenuId, &pulldownW,
+                   0);
+
+     if ( type == XmMENU_OPTION && pulldownW)
+     {
+       Widget which = 0;
+       XtVaGetValues(option,
+                     XmNmenuHistory, &which,
+                     0);
+       return which;
+     }
+   }
+   return 0;
+}
+