summaryrefslogtreecommitdiff
path: root/listbox_darwin.go
diff options
context:
space:
mode:
authorPietro Gagliardi <[email protected]>2014-04-05 22:51:01 -0400
committerPietro Gagliardi <[email protected]>2014-04-05 22:51:01 -0400
commit30c3ee1b98702b56a95637e99d1bd97ca1e07ecf (patch)
tree759666d96e0a2590dfe586cd92781fd58cb13aed /listbox_darwin.go
parente3a2a1541635d52cd5735f703cbed9c6e815b4d1 (diff)
Gave Listboxes a border on Mac OS X. That just leaves GTK+: oyxgen-gtk always gives GtkScrollingWindows a border, which misled me earlier... other themes don't.
Diffstat (limited to 'listbox_darwin.go')
-rw-r--r--listbox_darwin.go6
1 files changed, 6 insertions, 0 deletions
diff --git a/listbox_darwin.go b/listbox_darwin.go
index bf05b3c..2bc724e 100644
--- a/listbox_darwin.go
+++ b/listbox_darwin.go
@@ -193,16 +193,22 @@ var (
_setHasHorizontalScroller = sel_getUid("setHasHorizontalScroller:")
_setHasVerticalScroller = sel_getUid("setHasVerticalScroller:")
_setAutohidesScrollers = sel_getUid("setAutohidesScrollers:")
+ _setBorderType = sel_getUid("setBorderType:")
_setDocumentView = sel_getUid("setDocumentView:")
_documentView = sel_getUid("documentView")
)
func newListboxScrollView(listbox C.id) C.id {
+ const (
+ _NSBezelBorder = 2
+ )
+
scrollview := C.objc_msgSend_noargs(_NSScrollView, _alloc)
scrollview = initWithDummyFrame(scrollview)
C.objc_msgSend_bool(scrollview, _setHasHorizontalScroller, C.BOOL(C.YES))
C.objc_msgSend_bool(scrollview, _setHasVerticalScroller, C.BOOL(C.YES))
C.objc_msgSend_bool(scrollview, _setAutohidesScrollers, C.BOOL(C.YES))
+ C.objc_msgSend_uint(scrollview, _setBorderType, _NSBezelBorder) // this is what Interface Builder gives the scroll view
C.objc_msgSend_id(scrollview, _setDocumentView, listbox)
return scrollview
}