Lastest docs updated
travis build: 41
commit: e2bf4d5f03
auto-pushed to gh-pages
This commit is contained in:
@@ -124,12 +124,12 @@
|
||||
<a name="line-115"></a> <span class='hs-varid'>refreshView</span> <span class='hs-varid'>mygui</span> <span class='hs-varid'>myview</span> <span class='hs-varid'>item</span>
|
||||
<a name="line-116"></a>
|
||||
<a name="line-117"></a> <span class='hs-comment'>-- set notebook tab label</span>
|
||||
<a name="line-118"></a> <span class='hs-varid'>page</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>notebookGetCurrentPage</span> <span class='hs-layout'>(</span><span class='hs-varid'>notebook</span> <span class='hs-varid'>mygui</span><span class='hs-layout'>)</span>
|
||||
<a name="line-119"></a> <span class='hs-varid'>child</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>fromJust</span> <span class='hs-varop'><$></span> <span class='hs-varid'>notebookGetNthPage</span> <span class='hs-layout'>(</span><span class='hs-varid'>notebook</span> <span class='hs-varid'>mygui</span><span class='hs-layout'>)</span> <span class='hs-varid'>page</span>
|
||||
<a name="line-118"></a> <span class='hs-varid'>page</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>notebookGetCurrentPage</span> <span class='hs-layout'>(</span><span class='hs-varid'>notebook</span> <span class='hs-varid'>myview</span><span class='hs-layout'>)</span>
|
||||
<a name="line-119"></a> <span class='hs-varid'>child</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>fromJust</span> <span class='hs-varop'><$></span> <span class='hs-varid'>notebookGetNthPage</span> <span class='hs-layout'>(</span><span class='hs-varid'>notebook</span> <span class='hs-varid'>myview</span><span class='hs-layout'>)</span> <span class='hs-varid'>page</span>
|
||||
<a name="line-120"></a>
|
||||
<a name="line-121"></a> <span class='hs-comment'>-- get the label</span>
|
||||
<a name="line-122"></a> <span class='hs-varid'>ebox</span> <span class='hs-keyglyph'><-</span> <span class='hs-layout'>(</span><span class='hs-varid'>castToEventBox</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromJust</span><span class='hs-layout'>)</span>
|
||||
<a name="line-123"></a> <span class='hs-varop'><$></span> <span class='hs-varid'>notebookGetTabLabel</span> <span class='hs-layout'>(</span><span class='hs-varid'>notebook</span> <span class='hs-varid'>mygui</span><span class='hs-layout'>)</span> <span class='hs-varid'>child</span>
|
||||
<a name="line-123"></a> <span class='hs-varop'><$></span> <span class='hs-varid'>notebookGetTabLabel</span> <span class='hs-layout'>(</span><span class='hs-varid'>notebook</span> <span class='hs-varid'>myview</span><span class='hs-layout'>)</span> <span class='hs-varid'>child</span>
|
||||
<a name="line-124"></a> <span class='hs-varid'>label</span> <span class='hs-keyglyph'><-</span> <span class='hs-layout'>(</span><span class='hs-varid'>castToLabel</span> <span class='hs-varop'>.</span> <span class='hs-varid'>head</span><span class='hs-layout'>)</span> <span class='hs-varop'><$></span> <span class='hs-varid'>containerGetChildren</span> <span class='hs-varid'>ebox</span>
|
||||
<a name="line-125"></a>
|
||||
<a name="line-126"></a> <span class='hs-comment'>-- set the label</span>
|
||||
|
||||
Reference in New Issue
Block a user