Bug fix

diff --git a/gtk/gtkaction.lisp b/gtk/gtkaction.lisp
index 5860e2bcc33c1a82ca2c89f573c88f88b866779d..736e16ae10d3c69760862cc40b81907a55b0fc84 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)))