Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/mono/monodevelop.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Medrano <josmed@microsoft.com>2019-10-16 07:00:47 +0300
committermonojenkins <jo.shields+jenkins@xamarin.com>2019-10-31 11:44:13 +0300
commit2f4ee83f47bbd05e2f0b38bf3153ac770379dd96 (patch)
treeff8773ec0359e28b990d012b82b2ff08cfaed594 /main/external/fsharpbinding
parenteb2a0cc9b156f8fa41a27c30787acbac941ce05a (diff)
Changes current PropertyPad to use PropertyGridWrapper in Preferences Formatting F# panel
Diffstat (limited to 'main/external/fsharpbinding')
-rw-r--r--main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpFormattingPanelWidget.fs10
1 files changed, 5 insertions, 5 deletions
diff --git a/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpFormattingPanelWidget.fs b/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpFormattingPanelWidget.fs
index a5487f4f21..48cb88f58e 100644
--- a/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpFormattingPanelWidget.fs
+++ b/main/external/fsharpbinding/MonoDevelop.FSharpBinding/FSharpFormattingPanelWidget.fs
@@ -2,7 +2,7 @@
open Gtk
open MonoDevelop.Core
-open MonoDevelop.Components.PropertyGrid
+open MonoDevelop.DesignerSupport
// Handwritten GUI, feel free to edit
@@ -21,7 +21,7 @@ type FSharpFormattingPolicyPanelWidget() =
let mutable hbox2 : Gtk.HBox = null
let mutable vbox4 : Gtk.VBox = null
let mutable tableScopes : Gtk.Table = null
- let mutable propertyGrid : PropertyGrid = null
+ let mutable propertyGrid : PropertyGridWrapper = null
let getName format =
if format = policy.DefaultFormat then
@@ -125,12 +125,12 @@ type FSharpFormattingPolicyPanelWidget() =
w8.Expand <- false
w8.Fill <- false
// Container child vbox4.Gtk.Box+BoxChild
- propertyGrid <- new PropertyGrid()
+ propertyGrid <- new PropertyGridWrapper ()
propertyGrid.Name <- "propertyGrid"
propertyGrid.ShowToolbar <- false
propertyGrid.ShowHelp <- false
- vbox4.Add (propertyGrid)
- let w9 = vbox4.[propertyGrid] :?> Gtk.Box.BoxChild
+ vbox4.Add (propertyGrid.Widget)
+ let w9 = vbox4.[propertyGrid.Widget] :?> Gtk.Box.BoxChild
w9.Position <- 2
hbox1.Add(vbox4)
let w10 = hbox1.[vbox4] :?> Gtk.Box.BoxChild