From 363029e1896e843adc102d4fda4b2f4ac434eaa9 Mon Sep 17 00:00:00 2001
From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Fri, 29 Oct 2010 20:59:56 +0000
Subject: [PATCH] Bug fixed: a missing eta-expansion raised an assert false

---
 matita/matita/matitaGui.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/matita/matita/matitaGui.ml b/matita/matita/matitaGui.ml
index 7f2cb952c..a2f03e056 100644
--- a/matita/matita/matitaGui.ml
+++ b/matita/matita/matitaGui.ml
@@ -856,10 +856,10 @@ class gui () =
           | false -> main#toplevel#unfullscreen ());
       main#fullscreenMenuItem#set_active false;
       MatitaGtkMisc.toggle_callback ~check:main#ppNotationMenuItem
-        ~callback:(
+        ~callback:(function b ->
           let s = s () in
           let status =
-           Interpretations.toggle_active_interpretations s#grafite_status
+           Interpretations.toggle_active_interpretations s#grafite_status b
           in
            assert false (* MATITA1.0 ???
            s#set_grafite_status status*)
-- 
2.39.2