From 185195814e3eaf4658a8a03e3e0f2e361af081f9 Mon Sep 17 00:00:00 2001
From: Francis Lachapelle <flachapelle@inverse.ca>
Date: Tue, 8 Jan 2008 16:07:21 +0000
Subject: [PATCH] Monotone-Parent: 74fb27cf11d4f0564a4ac61bc6648ff8962ccc86
 Monotone-Revision: 1d7595555adaaa499a56601d8635282526350a2e

Monotone-Author: flachapelle@inverse.ca
Monotone-Date: 2008-01-08T16:07:21
Monotone-Branch: ca.inverse.sogo
---
 UI/WebServerResources/HTMLElement.js | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/UI/WebServerResources/HTMLElement.js b/UI/WebServerResources/HTMLElement.js
index 744510e58..5540e2eab 100644
--- a/UI/WebServerResources/HTMLElement.js
+++ b/UI/WebServerResources/HTMLElement.js
@@ -226,6 +226,16 @@ Element.addMethods({
     else {
       element.select();
     }
- }
+  },
+
+  getRadioValue: function(element, radioName) {
+    element = $(element);
+    var radioValue;
+    Form.getInputs(element, 'radio', radioName).each(function(input) {
+	if (input.checked)
+	  radioValue = input.value;
+      });
+    return radioValue;
+  }
 
 });