Bug fix

diff --git a/gtk/gtkaction.lisp b/gtk/gtkaction.lisp
index b2f8c2a889bd749042d50f4156a5861a77b061a3..13495c639de4a6317877a6644d9f79af27e74482 100644 (file)
--- a/gtk/gtkaction.lisp
+++ b/gtk/gtkaction.lisp
@@ -20,7 +20,7 @@
 ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 
-;; $Id: gtkaction.lisp,v 1.5 2005/04/23 16:48:52 espen Exp $
+;; $Id: gtkaction.lisp,v 1.6 2005/10/21 11:50:50 espen Exp $
 
 
 (in-package "GTK")
@@ -112,7 +112,7 @@ (defbinding (radio-action-get-current "gtk_radio_action_get_current_value")
   (radio-action radio-action))
 
 (defun radio-action-get-current-value (action)
-  (radio-value-action (radio-action-get-current action)))
+  (radio-action-value (radio-action-get-current action)))