From fc0401d0b8ef2c4f437d1e533dd0331d9b91082b Mon Sep 17 00:00:00 2001 From: Claudio Sacerdoti Coen Date: Wed, 17 Nov 2010 17:28:14 +0000 Subject: [PATCH] - stock icons restored - hbugs got rid of definitely --- matita/matita/matita.glade | 217 ++++++-------------------------- matita/matita/matitaMathView.ml | 19 +-- 2 files changed, 45 insertions(+), 191 deletions(-) diff --git a/matita/matita/matita.glade b/matita/matita/matita.glade index 46023a02e..f7be5eab3 100644 --- a/matita/matita/matita.glade +++ b/matita/matita/matita.glade @@ -80,24 +80,6 @@ - - - True - _View - True - - - - - True - HBugs Tutors - True - - - - - - False @@ -290,9 +272,9 @@ - + True - WhelpResults + WhelpResult 1 @@ -359,131 +341,6 @@ tab - - - True - vertical - - - True - True - - - True - True - - - - - 0 - - - - - True - both - - - True - - - gtk-refresh - True - True - False - True - - - - - False - - - - - True - - - gtk-remove - True - True - False - True - - - - - False - - - - - True - - - gtk-add - True - True - False - True - - - - - False - - - - - False - False - 1 - - - - - 4 - - - - - True - HBugs - - - 4 - False - tab - - - - - True - True - automatic - automatic - - - True - True - - - - - 5 - - - - - True - Universes - - - 5 - False - tab - - True @@ -590,16 +447,16 @@ - 6 + 4 - + True SearchText - 6 + 4 False tab @@ -797,7 +654,7 @@ - _New + gtk-new True True True @@ -806,7 +663,7 @@ - _Open... + gtk-open True True True @@ -815,7 +672,7 @@ - _Save + gtk-save True True True @@ -824,7 +681,7 @@ - Save _as ... + gtk-save-as True True True @@ -838,7 +695,7 @@ - _Quit + gtk-quit True True True @@ -858,7 +715,7 @@ - _Undo + gtk-undo True False True @@ -868,7 +725,7 @@ - _Redo + gtk-redo True False True @@ -883,7 +740,7 @@ - Cu_t + gtk-cut True True True @@ -892,7 +749,7 @@ - _Copy + gtk-copy True True True @@ -901,7 +758,7 @@ - _Paste + gtk-paste True True True @@ -933,7 +790,7 @@ - _Delete + gtk-delete True True True @@ -958,7 +815,7 @@ - _Find & replace ... + gtk-find-and-replace True True True @@ -997,18 +854,20 @@ - + + gtk-go-down True - Execute 1 phrase True + True - + + gtk-go-up True - Retract 1 phrase True + True @@ -1018,18 +877,20 @@ - + + gtk-goto-bottom True - Execute all True + True - + + gtk-goto-top True - Restart True + True @@ -1039,10 +900,11 @@ - + + gtk-jump-to True - Execute until cursor True + True @@ -1094,7 +956,7 @@ - Zoom _in + gtk-zoom-in True True True @@ -1103,7 +965,7 @@ - Zoom _out + gtk-zoom-out True True True @@ -1112,7 +974,7 @@ - _Normal size + gtk-zoom-100 True True True @@ -1170,12 +1032,11 @@ - - TeX/UTF-8 table + True Show the conversion table from TeX like sequences to UTF-8 + TeX/UTF-8 table True - True @@ -1207,7 +1068,7 @@ - _Contents + gtk-help True True True @@ -1216,7 +1077,7 @@ - _About + gtk-about True True True diff --git a/matita/matita/matitaMathView.ml b/matita/matita/matitaMathView.ml index 9990805ad..a8f20aa18 100644 --- a/matita/matita/matitaMathView.ml +++ b/matita/matita/matitaMathView.ml @@ -1052,8 +1052,6 @@ class cicBrowser_impl ~(history:MatitaTypes.mathViewer_entry MatitaMisc.history) val model = new MatitaGtkMisc.taggedStringListModel tags win#whelpResultTreeview - val model_univs = - new MatitaGtkMisc.multiStringListModel ~cols:2 win#universesTreeview val mutable lastDir = "" (* last loaded "directory" *) @@ -1093,11 +1091,11 @@ class cicBrowser_impl ~(history:MatitaTypes.mathViewer_entry MatitaMisc.history) * * Use only these functions to switch between the tabs *) - method private _showMath = win#mathOrListNotebook#goto_page 0 - method private _showList = win#mathOrListNotebook#goto_page 1 - method private _showList2 = win#mathOrListNotebook#goto_page 5 - method private _showSearch = win#mathOrListNotebook#goto_page 6 - method private _showGviz = win#mathOrListNotebook#goto_page 3 + method private _showMath = win#mathOrListNotebook#goto_page 0 + method private _showList = win#mathOrListNotebook#goto_page 1 + method private _showEgg = win#mathOrListNotebook#goto_page 2 + method private _showGviz = win#mathOrListNotebook#goto_page 3 + method private _showSearch = win#mathOrListNotebook#goto_page 4 method private back () = try @@ -1142,7 +1140,7 @@ class cicBrowser_impl ~(history:MatitaTypes.mathViewer_entry MatitaMisc.history) (* self#_showMath *) method private egg () = - win#mathOrListNotebook#goto_page 2; + self#_showEgg; Lazy.force load_easter_egg method private redraw_gviz ?center_on () = @@ -1269,11 +1267,6 @@ class cicBrowser_impl ~(history:MatitaTypes.mathViewer_entry MatitaMisc.history) List.iter (fun (tag, s) -> model#easy_append ~tag s) l; self#_showList - method private _loadList2 l = - model_univs#list_store#clear (); - List.iter model_univs#easy_mappend l; - self#_showList2 - (** { public methods, all must call _load!! } *) method load entry = -- 2.39.2