<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html>
<head>
<!-- Generated by HsColour, http://www.cs.york.ac.uk/fp/darcs/hscolour/ -->
<title>dist/build/Graphics/UI/Gtk/Windows/Window.hs</title>
<link type='text/css' rel='stylesheet' href='hscolour.css' />
</head>
<body>
<pre><a name="line-1"></a>
<a name="line-2"></a><span class='hs-comment'>{-# LINE 2 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-3"></a><span class='hs-comment'>-- -*-haskell-*-</span>
<a name="line-4"></a><span class='hs-comment'>-- GIMP Toolkit (GTK) Window</span>
<a name="line-5"></a><span class='hs-comment'>--</span>
<a name="line-6"></a><span class='hs-comment'>-- Author : Manuel M. T. Chakravarty, Axel Simon, Andy Stewart</span>
<a name="line-7"></a><span class='hs-comment'>--</span>
<a name="line-8"></a><span class='hs-comment'>-- Created: 27 April 2001</span>
<a name="line-9"></a><span class='hs-comment'>--</span>
<a name="line-10"></a><span class='hs-comment'>-- Copyright (C) 2001-2005 Manuel M. T. Chakravarty, Axel Simon</span>
<a name="line-11"></a><span class='hs-comment'>-- Copyright (C) 2009 Andy Stewart</span>
<a name="line-12"></a><span class='hs-comment'>--</span>
<a name="line-13"></a><span class='hs-comment'>-- This library is free software; you can redistribute it and/or</span>
<a name="line-14"></a><span class='hs-comment'>-- modify it under the terms of the GNU Lesser General Public</span>
<a name="line-15"></a><span class='hs-comment'>-- License as published by the Free Software Foundation; either</span>
<a name="line-16"></a><span class='hs-comment'>-- version 2.1 of the License, or (at your option) any later version.</span>
<a name="line-17"></a><span class='hs-comment'>--</span>
<a name="line-18"></a><span class='hs-comment'>-- This library is distributed in the hope that it will be useful,</span>
<a name="line-19"></a><span class='hs-comment'>-- but WITHOUT ANY WARRANTY; without even the implied warranty of</span>
<a name="line-20"></a><span class='hs-comment'>-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU</span>
<a name="line-21"></a><span class='hs-comment'>-- Lesser General Public License for more details.</span>
<a name="line-22"></a><span class='hs-comment'>--</span>
<a name="line-23"></a><span class='hs-comment'>-- |</span>
<a name="line-24"></a><span class='hs-comment'>-- Maintainer : gtk2hs-users@lists.sourceforge.net</span>
<a name="line-25"></a><span class='hs-comment'>-- Stability : provisional</span>
<a name="line-26"></a><span class='hs-comment'>-- Portability : portable (depends on GHC)</span>
<a name="line-27"></a><span class='hs-comment'>--</span>
<a name="line-28"></a><span class='hs-comment'>-- Toplevel which can contain other widgets</span>
<a name="line-29"></a><span class='hs-comment'>--</span>
<a name="line-30"></a><span class='hs-keyword'>module</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>Windows</span><span class='hs-varop'>.</span><span class='hs-conid'>Window</span> <span class='hs-layout'>(</span>
<a name="line-31"></a>
<a name="line-32"></a><span class='hs-comment'>-- * Class Hierarchy</span>
<a name="line-33"></a><span class='hs-comment'>-- |</span>
<a name="line-34"></a><span class='hs-comment'>-- @</span>
<a name="line-35"></a><span class='hs-comment'>-- | 'GObject'</span>
<a name="line-36"></a><span class='hs-comment'>-- | +----'Object'</span>
<a name="line-37"></a><span class='hs-comment'>-- | +----'Widget'</span>
<a name="line-38"></a><span class='hs-comment'>-- | +----'Container'</span>
<a name="line-39"></a><span class='hs-comment'>-- | +----'Bin'</span>
<a name="line-40"></a><span class='hs-comment'>-- | +----Window</span>
<a name="line-41"></a><span class='hs-comment'>-- | +----'Dialog'</span>
<a name="line-42"></a><span class='hs-comment'>-- | +----'Plug'</span>
<a name="line-43"></a><span class='hs-comment'>-- @</span>
<a name="line-44"></a>
<a name="line-45"></a><span class='hs-comment'>-- * Types</span>
<a name="line-46"></a> <span class='hs-conid'>Window</span><span class='hs-layout'>,</span>
<a name="line-47"></a> <span class='hs-conid'>WindowClass</span><span class='hs-layout'>,</span>
<a name="line-48"></a> <span class='hs-varid'>castToWindow</span><span class='hs-layout'>,</span> <span class='hs-varid'>gTypeWindow</span><span class='hs-layout'>,</span>
<a name="line-49"></a> <span class='hs-varid'>toWindow</span><span class='hs-layout'>,</span>
<a name="line-50"></a> <span class='hs-conid'>WindowType</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span>
<a name="line-51"></a> <span class='hs-conid'>WindowEdge</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span>
<a name="line-52"></a> <span class='hs-conid'>WindowTypeHint</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span>
<a name="line-53"></a> <span class='hs-conid'>Gravity</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span>
<a name="line-54"></a>
<a name="line-55"></a><span class='hs-comment'>-- * Constructors</span>
<a name="line-56"></a> <span class='hs-varid'>windowNew</span><span class='hs-layout'>,</span>
<a name="line-57"></a> <span class='hs-varid'>windowNewPopup</span><span class='hs-layout'>,</span>
<a name="line-58"></a>
<a name="line-59"></a><span class='hs-comment'>-- * Methods</span>
<a name="line-60"></a> <span class='hs-varid'>windowActivateFocus</span><span class='hs-layout'>,</span>
<a name="line-61"></a> <span class='hs-varid'>windowActivateDefault</span><span class='hs-layout'>,</span>
<a name="line-62"></a> <span class='hs-varid'>windowSetDefaultSize</span><span class='hs-layout'>,</span>
<a name="line-63"></a> <span class='hs-varid'>windowGetDefaultSize</span><span class='hs-layout'>,</span>
<a name="line-64"></a> <span class='hs-varid'>windowSetPosition</span><span class='hs-layout'>,</span>
<a name="line-65"></a> <span class='hs-conid'>WindowPosition</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span>
<a name="line-66"></a>
<a name="line-67"></a> <span class='hs-varid'>windowIsActive</span><span class='hs-layout'>,</span>
<a name="line-68"></a> <span class='hs-varid'>windowHasToplevelFocus</span><span class='hs-layout'>,</span>
<a name="line-69"></a>
<a name="line-70"></a> <span class='hs-varid'>windowListToplevels</span><span class='hs-layout'>,</span>
<a name="line-71"></a> <span class='hs-varid'>windowSetDefault</span><span class='hs-layout'>,</span>
<a name="line-72"></a>
<a name="line-73"></a> <span class='hs-varid'>windowGetDefaultWidget</span><span class='hs-layout'>,</span>
<a name="line-74"></a>
<a name="line-75"></a> <span class='hs-varid'>windowAddMnemonic</span><span class='hs-layout'>,</span>
<a name="line-76"></a> <span class='hs-varid'>windowRemoveMnemonic</span><span class='hs-layout'>,</span>
<a name="line-77"></a> <span class='hs-varid'>windowMnemonicActivate</span><span class='hs-layout'>,</span>
<a name="line-78"></a> <span class='hs-varid'>windowActivateKey</span><span class='hs-layout'>,</span>
<a name="line-79"></a> <span class='hs-varid'>windowPropagateKeyEvent</span><span class='hs-layout'>,</span>
<a name="line-80"></a> <span class='hs-varid'>windowPresent</span><span class='hs-layout'>,</span>
<a name="line-81"></a> <span class='hs-varid'>windowDeiconify</span><span class='hs-layout'>,</span>
<a name="line-82"></a> <span class='hs-varid'>windowIconify</span><span class='hs-layout'>,</span>
<a name="line-83"></a> <span class='hs-varid'>windowMaximize</span><span class='hs-layout'>,</span>
<a name="line-84"></a> <span class='hs-varid'>windowUnmaximize</span><span class='hs-layout'>,</span>
<a name="line-85"></a>
<a name="line-86"></a> <span class='hs-varid'>windowFullscreen</span><span class='hs-layout'>,</span>
<a name="line-87"></a> <span class='hs-varid'>windowUnfullscreen</span><span class='hs-layout'>,</span>
<a name="line-88"></a>
<a name="line-89"></a>
<a name="line-90"></a> <span class='hs-varid'>windowSetKeepAbove</span><span class='hs-layout'>,</span>
<a name="line-91"></a> <span class='hs-varid'>windowSetKeepBelow</span><span class='hs-layout'>,</span>
<a name="line-92"></a>
<a name="line-93"></a>
<a name="line-94"></a> <span class='hs-varid'>windowSetStartupId</span><span class='hs-layout'>,</span>
<a name="line-95"></a>
<a name="line-96"></a> <span class='hs-varid'>windowGetFrame</span><span class='hs-layout'>,</span>
<a name="line-97"></a> <span class='hs-varid'>windowSetFrameDimensions</span><span class='hs-layout'>,</span>
<a name="line-98"></a> <span class='hs-varid'>windowGetFrameDimensions</span><span class='hs-layout'>,</span>
<a name="line-99"></a> <span class='hs-varid'>windowStick</span><span class='hs-layout'>,</span>
<a name="line-100"></a> <span class='hs-varid'>windowUnstick</span><span class='hs-layout'>,</span>
<a name="line-101"></a> <span class='hs-varid'>windowAddAccelGroup</span><span class='hs-layout'>,</span>
<a name="line-102"></a> <span class='hs-varid'>windowRemoveAccelGroup</span><span class='hs-layout'>,</span>
<a name="line-103"></a> <span class='hs-varid'>windowSetDefaultIconList</span><span class='hs-layout'>,</span>
<a name="line-104"></a> <span class='hs-varid'>windowGetDefaultIconList</span><span class='hs-layout'>,</span>
<a name="line-105"></a>
<a name="line-106"></a> <span class='hs-varid'>windowSetDefaultIcon</span><span class='hs-layout'>,</span>
<a name="line-107"></a>
<a name="line-108"></a>
<a name="line-109"></a> <span class='hs-varid'>windowSetDefaultIconFromFile</span><span class='hs-layout'>,</span>
<a name="line-110"></a> <span class='hs-varid'>windowSetDefaultIconName</span><span class='hs-layout'>,</span>
<a name="line-111"></a>
<a name="line-112"></a> <span class='hs-varid'>windowGetDefaultIconName</span><span class='hs-layout'>,</span>
<a name="line-113"></a>
<a name="line-114"></a>
<a name="line-115"></a> <span class='hs-varid'>windowSetGravity</span><span class='hs-layout'>,</span>
<a name="line-116"></a> <span class='hs-varid'>windowGetGravity</span><span class='hs-layout'>,</span>
<a name="line-117"></a>
<a name="line-118"></a> <span class='hs-varid'>windowSetScreen</span><span class='hs-layout'>,</span>
<a name="line-119"></a> <span class='hs-varid'>windowGetScreen</span><span class='hs-layout'>,</span>
<a name="line-120"></a>
<a name="line-121"></a> <span class='hs-varid'>windowBeginResizeDrag</span><span class='hs-layout'>,</span>
<a name="line-122"></a> <span class='hs-varid'>windowBeginMoveDrag</span><span class='hs-layout'>,</span>
<a name="line-123"></a> <span class='hs-varid'>windowSetTypeHint</span><span class='hs-layout'>,</span>
<a name="line-124"></a> <span class='hs-varid'>windowGetTypeHint</span><span class='hs-layout'>,</span>
<a name="line-125"></a> <span class='hs-varid'>windowGetIcon</span><span class='hs-layout'>,</span>
<a name="line-126"></a> <span class='hs-varid'>windowGetPosition</span><span class='hs-layout'>,</span>
<a name="line-127"></a> <span class='hs-varid'>windowGetSize</span><span class='hs-layout'>,</span>
<a name="line-128"></a> <span class='hs-varid'>windowMove</span><span class='hs-layout'>,</span>
<a name="line-129"></a> <span class='hs-varid'>windowParseGeometry</span><span class='hs-layout'>,</span>
<a name="line-130"></a> <span class='hs-varid'>windowReshowWithInitialSize</span><span class='hs-layout'>,</span>
<a name="line-131"></a> <span class='hs-varid'>windowResize</span><span class='hs-layout'>,</span>
<a name="line-132"></a>
<a name="line-133"></a> <span class='hs-varid'>windowSetIconFromFile</span><span class='hs-layout'>,</span>
<a name="line-134"></a> <span class='hs-varid'>windowSetAutoStartupNotification</span><span class='hs-layout'>,</span>
<a name="line-135"></a>
<a name="line-136"></a>
<a name="line-137"></a> <span class='hs-varid'>windowPresentWithTime</span><span class='hs-layout'>,</span>
<a name="line-138"></a>
<a name="line-139"></a> <span class='hs-varid'>windowSetGeometryHints</span><span class='hs-layout'>,</span>
<a name="line-140"></a>
<a name="line-141"></a> <span class='hs-varid'>windowGetGroup</span><span class='hs-layout'>,</span>
<a name="line-142"></a>
<a name="line-143"></a>
<a name="line-144"></a><span class='hs-comment'>-- * Attributes</span>
<a name="line-145"></a> <span class='hs-varid'>windowTitle</span><span class='hs-layout'>,</span>
<a name="line-146"></a> <span class='hs-varid'>windowType</span><span class='hs-layout'>,</span>
<a name="line-147"></a> <span class='hs-varid'>windowAllowShrink</span><span class='hs-layout'>,</span>
<a name="line-148"></a> <span class='hs-varid'>windowAllowGrow</span><span class='hs-layout'>,</span>
<a name="line-149"></a> <span class='hs-varid'>windowResizable</span><span class='hs-layout'>,</span>
<a name="line-150"></a> <span class='hs-varid'>windowModal</span><span class='hs-layout'>,</span>
<a name="line-151"></a>
<a name="line-152"></a> <span class='hs-varid'>windowOpacity</span><span class='hs-layout'>,</span>
<a name="line-153"></a>
<a name="line-154"></a> <span class='hs-varid'>windowRole</span><span class='hs-layout'>,</span>
<a name="line-155"></a>
<a name="line-156"></a> <span class='hs-varid'>windowStartupId</span><span class='hs-layout'>,</span>
<a name="line-157"></a>
<a name="line-158"></a> <span class='hs-varid'>windowWindowPosition</span><span class='hs-layout'>,</span>
<a name="line-159"></a> <span class='hs-varid'>windowDefaultWidth</span><span class='hs-layout'>,</span>
<a name="line-160"></a> <span class='hs-varid'>windowDefaultHeight</span><span class='hs-layout'>,</span>
<a name="line-161"></a> <span class='hs-varid'>windowDeletable</span><span class='hs-layout'>,</span>
<a name="line-162"></a> <span class='hs-varid'>windowDestroyWithParent</span><span class='hs-layout'>,</span>
<a name="line-163"></a> <span class='hs-varid'>windowIcon</span><span class='hs-layout'>,</span>
<a name="line-164"></a> <span class='hs-varid'>windowIconName</span><span class='hs-layout'>,</span>
<a name="line-165"></a>
<a name="line-166"></a> <span class='hs-varid'>windowScreen</span><span class='hs-layout'>,</span>
<a name="line-167"></a>
<a name="line-168"></a> <span class='hs-varid'>windowTypeHint</span><span class='hs-layout'>,</span>
<a name="line-169"></a>
<a name="line-170"></a> <span class='hs-varid'>windowSkipTaskbarHint</span><span class='hs-layout'>,</span>
<a name="line-171"></a> <span class='hs-varid'>windowSkipPagerHint</span><span class='hs-layout'>,</span>
<a name="line-172"></a>
<a name="line-173"></a>
<a name="line-174"></a> <span class='hs-varid'>windowUrgencyHint</span><span class='hs-layout'>,</span>
<a name="line-175"></a>
<a name="line-176"></a>
<a name="line-177"></a> <span class='hs-varid'>windowAcceptFocus</span><span class='hs-layout'>,</span>
<a name="line-178"></a>
<a name="line-179"></a>
<a name="line-180"></a> <span class='hs-varid'>windowFocusOnMap</span><span class='hs-layout'>,</span>
<a name="line-181"></a>
<a name="line-182"></a>
<a name="line-183"></a> <span class='hs-varid'>windowDecorated</span><span class='hs-layout'>,</span>
<a name="line-184"></a> <span class='hs-varid'>windowGravity</span><span class='hs-layout'>,</span>
<a name="line-185"></a>
<a name="line-186"></a> <span class='hs-varid'>windowToplevelFocus</span><span class='hs-layout'>,</span>
<a name="line-187"></a> <span class='hs-varid'>windowTransientFor</span><span class='hs-layout'>,</span>
<a name="line-188"></a> <span class='hs-varid'>windowFocus</span><span class='hs-layout'>,</span>
<a name="line-189"></a> <span class='hs-varid'>windowHasFrame</span><span class='hs-layout'>,</span>
<a name="line-190"></a> <span class='hs-varid'>windowIconList</span><span class='hs-layout'>,</span>
<a name="line-191"></a> <span class='hs-varid'>windowMnemonicModifier</span><span class='hs-layout'>,</span>
<a name="line-192"></a>
<a name="line-193"></a><span class='hs-comment'>-- * Signals</span>
<a name="line-194"></a> <span class='hs-varid'>frameEvent</span><span class='hs-layout'>,</span>
<a name="line-195"></a> <span class='hs-varid'>keysChanged</span><span class='hs-layout'>,</span>
<a name="line-196"></a> <span class='hs-varid'>setFocus</span><span class='hs-layout'>,</span>
<a name="line-197"></a>
<a name="line-198"></a><span class='hs-comment'>-- * Deprecated</span>
<a name="line-199"></a>
<a name="line-200"></a> <span class='hs-varid'>windowSetTitle</span><span class='hs-layout'>,</span>
<a name="line-201"></a> <span class='hs-varid'>windowGetTitle</span><span class='hs-layout'>,</span>
<a name="line-202"></a> <span class='hs-varid'>windowSetResizable</span><span class='hs-layout'>,</span>
<a name="line-203"></a> <span class='hs-varid'>windowGetResizable</span><span class='hs-layout'>,</span>
<a name="line-204"></a> <span class='hs-varid'>windowSetModal</span><span class='hs-layout'>,</span>
<a name="line-205"></a> <span class='hs-varid'>windowGetModal</span><span class='hs-layout'>,</span>
<a name="line-206"></a> <span class='hs-varid'>windowSetPolicy</span><span class='hs-layout'>,</span>
<a name="line-207"></a> <span class='hs-varid'>windowSetTransientFor</span><span class='hs-layout'>,</span>
<a name="line-208"></a> <span class='hs-varid'>windowGetTransientFor</span><span class='hs-layout'>,</span>
<a name="line-209"></a> <span class='hs-varid'>windowSetDestroyWithParent</span><span class='hs-layout'>,</span>
<a name="line-210"></a> <span class='hs-varid'>windowGetDestroyWithParent</span><span class='hs-layout'>,</span>
<a name="line-211"></a> <span class='hs-varid'>windowGetFocus</span><span class='hs-layout'>,</span>
<a name="line-212"></a> <span class='hs-varid'>windowSetFocus</span><span class='hs-layout'>,</span>
<a name="line-213"></a> <span class='hs-varid'>windowSetMnemonicModifier</span><span class='hs-layout'>,</span>
<a name="line-214"></a> <span class='hs-varid'>windowGetMnemonicModifier</span><span class='hs-layout'>,</span>
<a name="line-215"></a>
<a name="line-216"></a> <span class='hs-varid'>windowSetSkipTaskbarHint</span><span class='hs-layout'>,</span>
<a name="line-217"></a> <span class='hs-varid'>windowGetSkipTaskbarHint</span><span class='hs-layout'>,</span>
<a name="line-218"></a> <span class='hs-varid'>windowSetSkipPagerHint</span><span class='hs-layout'>,</span>
<a name="line-219"></a> <span class='hs-varid'>windowGetSkipPagerHint</span><span class='hs-layout'>,</span>
<a name="line-220"></a>
<a name="line-221"></a> <span class='hs-varid'>windowSetAcceptFocus</span><span class='hs-layout'>,</span>
<a name="line-222"></a> <span class='hs-varid'>windowGetAcceptFocus</span><span class='hs-layout'>,</span>
<a name="line-223"></a>
<a name="line-224"></a> <span class='hs-varid'>windowSetFocusOnMap</span><span class='hs-layout'>,</span>
<a name="line-225"></a> <span class='hs-varid'>windowGetFocusOnMap</span><span class='hs-layout'>,</span>
<a name="line-226"></a>
<a name="line-227"></a>
<a name="line-228"></a>
<a name="line-229"></a> <span class='hs-varid'>windowSetDecorated</span><span class='hs-layout'>,</span>
<a name="line-230"></a> <span class='hs-varid'>windowGetDecorated</span><span class='hs-layout'>,</span>
<a name="line-231"></a>
<a name="line-232"></a> <span class='hs-varid'>windowSetDeletable</span><span class='hs-layout'>,</span>
<a name="line-233"></a> <span class='hs-varid'>windowGetDeletable</span><span class='hs-layout'>,</span>
<a name="line-234"></a>
<a name="line-235"></a> <span class='hs-varid'>windowSetHasFrame</span><span class='hs-layout'>,</span>
<a name="line-236"></a> <span class='hs-varid'>windowGetHasFrame</span><span class='hs-layout'>,</span>
<a name="line-237"></a> <span class='hs-varid'>windowSetRole</span><span class='hs-layout'>,</span>
<a name="line-238"></a> <span class='hs-varid'>windowGetRole</span><span class='hs-layout'>,</span>
<a name="line-239"></a> <span class='hs-varid'>windowSetIcon</span><span class='hs-layout'>,</span>
<a name="line-240"></a> <span class='hs-varid'>windowSetIconList</span><span class='hs-layout'>,</span>
<a name="line-241"></a> <span class='hs-varid'>windowGetIconList</span><span class='hs-layout'>,</span>
<a name="line-242"></a>
<a name="line-243"></a> <span class='hs-varid'>windowSetIconName</span><span class='hs-layout'>,</span>
<a name="line-244"></a> <span class='hs-varid'>windowGetIconName</span><span class='hs-layout'>,</span>
<a name="line-245"></a>
<a name="line-246"></a>
<a name="line-247"></a> <span class='hs-varid'>windowSetUrgencyHint</span><span class='hs-layout'>,</span>
<a name="line-248"></a> <span class='hs-varid'>windowGetUrgencyHint</span><span class='hs-layout'>,</span>
<a name="line-249"></a>
<a name="line-250"></a> <span class='hs-varid'>windowSetOpacity</span><span class='hs-layout'>,</span>
<a name="line-251"></a> <span class='hs-varid'>windowGetOpacity</span><span class='hs-layout'>,</span>
<a name="line-252"></a>
<a name="line-253"></a>
<a name="line-254"></a> <span class='hs-varid'>onSetFocus</span><span class='hs-layout'>,</span>
<a name="line-255"></a> <span class='hs-varid'>afterSetFocus</span>
<a name="line-256"></a>
<a name="line-257"></a> <span class='hs-layout'>)</span> <span class='hs-keyword'>where</span>
<a name="line-258"></a>
<a name="line-259"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Control</span><span class='hs-varop'>.</span><span class='hs-conid'>Monad</span> <span class='hs-layout'>(</span><span class='hs-varid'>liftM</span><span class='hs-layout'>)</span>
<a name="line-260"></a>
<a name="line-261"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>Glib</span><span class='hs-varop'>.</span><span class='hs-conid'>FFI</span>
<a name="line-262"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>Glib</span><span class='hs-varop'>.</span><span class='hs-conid'>UTFString</span>
<a name="line-263"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>Glib</span><span class='hs-varop'>.</span><span class='hs-conid'>Flags</span>
<a name="line-264"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>Glib</span><span class='hs-varop'>.</span><span class='hs-conid'>GError</span>
<a name="line-265"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>Glib</span><span class='hs-varop'>.</span><span class='hs-conid'>Attributes</span>
<a name="line-266"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>Glib</span><span class='hs-varop'>.</span><span class='hs-conid'>Properties</span>
<a name="line-267"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>Glib</span><span class='hs-varop'>.</span><span class='hs-conid'>GList</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromGList</span><span class='hs-layout'>,</span> <span class='hs-varid'>withGList</span><span class='hs-layout'>)</span>
<a name="line-268"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>System</span><span class='hs-varop'>.</span><span class='hs-conid'>Glib</span><span class='hs-varop'>.</span><span class='hs-conid'>GObject</span> <span class='hs-layout'>(</span><span class='hs-varid'>makeNewGObject</span><span class='hs-layout'>)</span>
<a name="line-269"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>Abstract</span><span class='hs-varop'>.</span><span class='hs-conid'>Object</span> <span class='hs-layout'>(</span><span class='hs-varid'>makeNewObject</span><span class='hs-layout'>)</span>
<a name="line-270"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>General</span><span class='hs-varop'>.</span><span class='hs-conid'>Enums</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowType</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span> <span class='hs-conid'>WindowPosition</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-271"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>General</span><span class='hs-varop'>.</span><span class='hs-conid'>Structs</span> <span class='hs-layout'>(</span><span class='hs-varid'>windowGetFrame</span><span class='hs-layout'>)</span>
<a name="line-272"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>Types</span>
<a name="line-273"></a><span class='hs-comment'>{-# LINE 272 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-274"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>Signals</span>
<a name="line-275"></a><span class='hs-comment'>{-# LINE 273 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-276"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>Gdk</span><span class='hs-varop'>.</span><span class='hs-conid'>Enums</span> <span class='hs-layout'>(</span><span class='hs-conid'>Modifier</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-277"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>Gdk</span><span class='hs-varop'>.</span><span class='hs-conid'>Keys</span> <span class='hs-layout'>(</span><span class='hs-conid'>KeyVal</span><span class='hs-layout'>)</span>
<a name="line-278"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>Gdk</span><span class='hs-varop'>.</span><span class='hs-conid'>EventM</span> <span class='hs-layout'>(</span><span class='hs-conid'>EventM</span><span class='hs-layout'>,</span> <span class='hs-conid'>EAny</span><span class='hs-layout'>,</span> <span class='hs-conid'>EKey</span><span class='hs-layout'>,</span> <span class='hs-conid'>MouseButton</span><span class='hs-layout'>,</span> <span class='hs-conid'>TimeStamp</span><span class='hs-layout'>)</span>
<a name="line-279"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Control</span><span class='hs-varop'>.</span><span class='hs-conid'>Monad</span><span class='hs-varop'>.</span><span class='hs-conid'>Reader</span> <span class='hs-layout'>(</span> <span class='hs-varid'>runReaderT</span><span class='hs-layout'>,</span> <span class='hs-varid'>ask</span> <span class='hs-layout'>)</span>
<a name="line-280"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Control</span><span class='hs-varop'>.</span><span class='hs-conid'>Monad</span><span class='hs-varop'>.</span><span class='hs-conid'>Trans</span> <span class='hs-layout'>(</span> <span class='hs-varid'>liftIO</span> <span class='hs-layout'>)</span>
<a name="line-281"></a><span class='hs-keyword'>import</span> <span class='hs-conid'>Graphics</span><span class='hs-varop'>.</span><span class='hs-conid'>UI</span><span class='hs-varop'>.</span><span class='hs-conid'>Gtk</span><span class='hs-varop'>.</span><span class='hs-conid'>Gdk</span><span class='hs-varop'>.</span><span class='hs-conid'>Enums</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowEdge</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span> <span class='hs-conid'>WindowTypeHint</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>,</span>
<a name="line-282"></a> <span class='hs-conid'>Gravity</span><span class='hs-layout'>(</span><span class='hs-keyglyph'>..</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-283"></a>
<a name="line-284"></a>
<a name="line-285"></a><span class='hs-comment'>{-# LINE 282 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-286"></a>
<a name="line-287"></a><span class='hs-comment'>--------------------</span>
<a name="line-288"></a><span class='hs-comment'>-- Constructors</span>
<a name="line-289"></a>
<a name="line-290"></a><a name="windowNew"></a><span class='hs-comment'>-- | Create a new top level window.</span>
<a name="line-291"></a><span class='hs-comment'>--</span>
<a name="line-292"></a><span class='hs-definition'>windowNew</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Window</span>
<a name="line-293"></a><span class='hs-definition'>windowNew</span> <span class='hs-keyglyph'>=</span>
<a name="line-294"></a> <span class='hs-varid'>makeNewObject</span> <span class='hs-varid'>mkWindow</span> <span class='hs-varop'>$</span>
<a name="line-295"></a> <span class='hs-varid'>liftM</span> <span class='hs-layout'>(</span><span class='hs-varid'>castPtr</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-296"></a> <span class='hs-varid'>gtk_window_new</span>
<a name="line-297"></a><span class='hs-comment'>{-# LINE 293 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-298"></a> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromEnum</span><span class='hs-layout'>)</span> <span class='hs-conid'>WindowToplevel</span><span class='hs-layout'>)</span>
<a name="line-299"></a>
<a name="line-300"></a><a name="windowNewPopup"></a><span class='hs-comment'>-- | Create a popup window.</span>
<a name="line-301"></a><span class='hs-comment'>--</span>
<a name="line-302"></a><span class='hs-definition'>windowNewPopup</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Window</span>
<a name="line-303"></a><span class='hs-definition'>windowNewPopup</span> <span class='hs-keyglyph'>=</span>
<a name="line-304"></a> <span class='hs-varid'>makeNewObject</span> <span class='hs-varid'>mkWindow</span> <span class='hs-varop'>$</span>
<a name="line-305"></a> <span class='hs-varid'>liftM</span> <span class='hs-layout'>(</span><span class='hs-varid'>castPtr</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-306"></a> <span class='hs-varid'>gtk_window_new</span>
<a name="line-307"></a><span class='hs-comment'>{-# LINE 302 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-308"></a> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromEnum</span><span class='hs-layout'>)</span> <span class='hs-conid'>WindowPopup</span><span class='hs-layout'>)</span>
<a name="line-309"></a>
<a name="line-310"></a><span class='hs-comment'>--------------------</span>
<a name="line-311"></a><span class='hs-comment'>-- Methods</span>
<a name="line-312"></a>
<a name="line-313"></a><a name="windowSetTitle"></a><span class='hs-comment'>-- | Sets the title of the 'Window'. The title of a window will be displayed</span>
<a name="line-314"></a><span class='hs-comment'>-- in its title bar; on the X Window System, the title bar is rendered by the</span>
<a name="line-315"></a><span class='hs-comment'>-- window manager, so exactly how the title appears to users may vary according</span>
<a name="line-316"></a><span class='hs-comment'>-- to a user's exact configuration. The title should help a user distinguish</span>
<a name="line-317"></a><span class='hs-comment'>-- this window from other windows they may have open. A good title might</span>
<a name="line-318"></a><span class='hs-comment'>-- include the application name and current document filename, for example.</span>
<a name="line-319"></a><span class='hs-comment'>--</span>
<a name="line-320"></a><span class='hs-definition'>windowSetTitle</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>String</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-321"></a><span class='hs-definition'>windowSetTitle</span> <span class='hs-varid'>self</span> <span class='hs-varid'>title</span> <span class='hs-keyglyph'>=</span>
<a name="line-322"></a> <span class='hs-varid'>withUTFString</span> <span class='hs-varid'>title</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>titlePtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-323"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_title</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-324"></a><span class='hs-comment'>{-# LINE 318 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-325"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-326"></a> <span class='hs-varid'>titlePtr</span>
<a name="line-327"></a>
<a name="line-328"></a><a name="windowGetTitle"></a><span class='hs-comment'>-- | Retrieves the title of the window. See 'windowSetTitle'.</span>
<a name="line-329"></a><span class='hs-comment'>--</span>
<a name="line-330"></a><span class='hs-definition'>windowGetTitle</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>String</span>
<a name="line-331"></a><span class='hs-definition'>windowGetTitle</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-332"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_title</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-333"></a><span class='hs-comment'>{-# LINE 326 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-334"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-335"></a> <span class='hs-varop'>>>=</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>strPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>if</span> <span class='hs-varid'>strPtr</span> <span class='hs-varop'>==</span> <span class='hs-varid'>nullPtr</span>
<a name="line-336"></a> <span class='hs-keyword'>then</span> <span class='hs-varid'>return</span> <span class='hs-str'>""</span>
<a name="line-337"></a> <span class='hs-keyword'>else</span> <span class='hs-varid'>peekUTFString</span> <span class='hs-varid'>strPtr</span>
<a name="line-338"></a>
<a name="line-339"></a><a name="windowSetResizable"></a><span class='hs-comment'>-- | Sets whether the user can resize a window. Windows are user resizable by</span>
<a name="line-340"></a><span class='hs-comment'>-- default.</span>
<a name="line-341"></a><span class='hs-comment'>--</span>
<a name="line-342"></a><span class='hs-definition'>windowSetResizable</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-343"></a><span class='hs-definition'>windowSetResizable</span> <span class='hs-varid'>self</span> <span class='hs-varid'>resizable</span> <span class='hs-keyglyph'>=</span>
<a name="line-344"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_resizable</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-345"></a><span class='hs-comment'>{-# LINE 337 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-346"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-347"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>resizable</span><span class='hs-layout'>)</span>
<a name="line-348"></a>
<a name="line-349"></a><a name="windowGetResizable"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetResizable'.</span>
<a name="line-350"></a><span class='hs-comment'>--</span>
<a name="line-351"></a><span class='hs-definition'>windowGetResizable</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-352"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if the user can resize the window</span>
<a name="line-353"></a><span class='hs-definition'>windowGetResizable</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-354"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-355"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_resizable</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-356"></a><span class='hs-comment'>{-# LINE 347 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-357"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-358"></a>
<a name="line-359"></a><a name="windowActivateFocus"></a><span class='hs-comment'>-- | Activates the current focused widget within the window.</span>
<a name="line-360"></a><span class='hs-comment'>--</span>
<a name="line-361"></a><span class='hs-definition'>windowActivateFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-362"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if a widget got activated.</span>
<a name="line-363"></a><span class='hs-definition'>windowActivateFocus</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-364"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-365"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_activate_focus</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-366"></a><span class='hs-comment'>{-# LINE 356 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-367"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-368"></a>
<a name="line-369"></a><a name="windowActivateDefault"></a><span class='hs-comment'>-- | Activates the default widget for the window, unless the current focused</span>
<a name="line-370"></a><span class='hs-comment'>-- widget has been configured to receive the default action (see</span>
<a name="line-371"></a><span class='hs-comment'>-- 'ReceivesDefault' in 'WidgetFlags'), in which case the focused widget is</span>
<a name="line-372"></a><span class='hs-comment'>-- activated.</span>
<a name="line-373"></a><span class='hs-comment'>--</span>
<a name="line-374"></a><span class='hs-definition'>windowActivateDefault</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-375"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if a widget got activated.</span>
<a name="line-376"></a><span class='hs-definition'>windowActivateDefault</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-377"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-378"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_activate_default</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-379"></a><span class='hs-comment'>{-# LINE 368 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-380"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-381"></a>
<a name="line-382"></a>
<a name="line-383"></a><a name="windowSetPolicy"></a><span class='hs-comment'>{-# DEPRECATED windowSetPolicy "Use windowSetResizable instead." #-}</span>
<a name="line-384"></a><span class='hs-comment'>-- | Sets the window resizing policy.</span>
<a name="line-385"></a><span class='hs-comment'>--</span>
<a name="line-386"></a><span class='hs-comment'>-- * Warning: this function is deprecated and should not be used in</span>
<a name="line-387"></a><span class='hs-comment'>-- newly-written code. Use 'windowSetResizable' instead.</span>
<a name="line-388"></a><span class='hs-comment'>--</span>
<a name="line-389"></a><span class='hs-definition'>windowSetPolicy</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-390"></a><span class='hs-definition'>windowSetPolicy</span> <span class='hs-varid'>self</span> <span class='hs-varid'>allowShrink</span> <span class='hs-varid'>allowGrow</span> <span class='hs-varid'>autoShrink</span> <span class='hs-keyglyph'>=</span>
<a name="line-391"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_policy</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span><span class='hs-layout'>)</span>
<a name="line-392"></a><span class='hs-comment'>{-# LINE 380 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-393"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-394"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>allowShrink</span><span class='hs-layout'>)</span>
<a name="line-395"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>allowGrow</span><span class='hs-layout'>)</span>
<a name="line-396"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>autoShrink</span><span class='hs-layout'>)</span>
<a name="line-397"></a>
<a name="line-398"></a>
<a name="line-399"></a><a name="windowSetModal"></a><span class='hs-comment'>-- | Sets a window modal or non-modal. Modal windows prevent interaction with</span>
<a name="line-400"></a><span class='hs-comment'>-- other windows in the same application. To keep modal dialogs on top of main</span>
<a name="line-401"></a><span class='hs-comment'>-- application windows, use 'windowSetTransientFor' to make the dialog</span>
<a name="line-402"></a><span class='hs-comment'>-- transient for the parent; most window managers will then disallow lowering</span>
<a name="line-403"></a><span class='hs-comment'>-- the dialog below the parent.</span>
<a name="line-404"></a><span class='hs-comment'>--</span>
<a name="line-405"></a><span class='hs-definition'>windowSetModal</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-406"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @modal@ - whether the window is modal</span>
<a name="line-407"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-408"></a><span class='hs-definition'>windowSetModal</span> <span class='hs-varid'>self</span> <span class='hs-varid'>modal</span> <span class='hs-keyglyph'>=</span>
<a name="line-409"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_modal</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-410"></a><span class='hs-comment'>{-# LINE 397 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-411"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-412"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>modal</span><span class='hs-layout'>)</span>
<a name="line-413"></a>
<a name="line-414"></a><a name="windowGetModal"></a><span class='hs-comment'>-- | Returns whether the window is modal. See 'windowSetModal'.</span>
<a name="line-415"></a><span class='hs-comment'>--</span>
<a name="line-416"></a><span class='hs-definition'>windowGetModal</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-417"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if the window is set to be modal and</span>
<a name="line-418"></a> <span class='hs-comment'>-- establishes a grab when shown</span>
<a name="line-419"></a><span class='hs-definition'>windowGetModal</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-420"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-421"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_modal</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-422"></a><span class='hs-comment'>{-# LINE 408 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-423"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-424"></a>
<a name="line-425"></a><a name="windowSetDefaultSize"></a><span class='hs-comment'>-- | Sets the default size of a window. If the window's \"natural\" size (its</span>
<a name="line-426"></a><span class='hs-comment'>-- size request) is larger than the default, the default will be ignored. More</span>
<a name="line-427"></a><span class='hs-comment'>-- generally, if the default size does not obey the geometry hints for the</span>
<a name="line-428"></a><span class='hs-comment'>-- window ('windowSetGeometryHints' can be used to set these explicitly), the</span>
<a name="line-429"></a><span class='hs-comment'>-- default size will be clamped to the nearest permitted size.</span>
<a name="line-430"></a><span class='hs-comment'>--</span>
<a name="line-431"></a><span class='hs-comment'>-- Unlike 'widgetSetSizeRequest', which sets a size request for a widget and</span>
<a name="line-432"></a><span class='hs-comment'>-- thus would keep users from shrinking the window, this function only sets the</span>
<a name="line-433"></a><span class='hs-comment'>-- initial size, just as if the user had resized the window themselves. Users</span>
<a name="line-434"></a><span class='hs-comment'>-- can still shrink the window again as they normally would. Setting a default</span>
<a name="line-435"></a><span class='hs-comment'>-- size of -1 means to use the \"natural\" default size (the size request of</span>
<a name="line-436"></a><span class='hs-comment'>-- the window).</span>
<a name="line-437"></a><span class='hs-comment'>--</span>
<a name="line-438"></a><span class='hs-comment'>-- For more control over a window's initial size and how resizing works,</span>
<a name="line-439"></a><span class='hs-comment'>-- investigate 'windowSetGeometryHints'.</span>
<a name="line-440"></a><span class='hs-comment'>--</span>
<a name="line-441"></a><span class='hs-comment'>-- For some uses, 'windowResize' is a more appropriate function.</span>
<a name="line-442"></a><span class='hs-comment'>-- 'windowResize' changes the current size of the window, rather than the size</span>
<a name="line-443"></a><span class='hs-comment'>-- to be used on initial display. 'windowResize' always affects the window</span>
<a name="line-444"></a><span class='hs-comment'>-- itself, not the geometry widget.</span>
<a name="line-445"></a><span class='hs-comment'>--</span>
<a name="line-446"></a><span class='hs-comment'>-- The default size of a window only affects the first time a window is</span>
<a name="line-447"></a><span class='hs-comment'>-- shown; if a window is hidden and re-shown, it will remember the size it had</span>
<a name="line-448"></a><span class='hs-comment'>-- prior to hiding, rather than using the default size.</span>
<a name="line-449"></a><span class='hs-comment'>--</span>
<a name="line-450"></a><span class='hs-comment'>-- Windows can't actually be 0x0 in size, they must be at least 1x1, but</span>
<a name="line-451"></a><span class='hs-comment'>-- passing 0 for @width@ and @height@ is OK, resulting in a 1x1 default size.</span>
<a name="line-452"></a><span class='hs-comment'>--</span>
<a name="line-453"></a><span class='hs-definition'>windowSetDefaultSize</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-454"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @height@ - height in pixels, or -1 to unset the default height</span>
<a name="line-455"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @width@ - width in pixels, or -1 to unset the default width</span>
<a name="line-456"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-457"></a><span class='hs-definition'>windowSetDefaultSize</span> <span class='hs-varid'>self</span> <span class='hs-varid'>height</span> <span class='hs-varid'>width</span> <span class='hs-keyglyph'>=</span>
<a name="line-458"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_default_size</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span>
<a name="line-459"></a><span class='hs-comment'>{-# LINE 444 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-460"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-461"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span>
<a name="line-462"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>width</span><span class='hs-layout'>)</span>
<a name="line-463"></a>
<a name="line-464"></a><a name="windowAddMnemonic"></a><span class='hs-comment'>-- | Adds a mnemonic to this window.</span>
<a name="line-465"></a><span class='hs-comment'>--</span>
<a name="line-466"></a><span class='hs-definition'>windowAddMnemonic</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span><span class='hs-layout'>,</span> <span class='hs-conid'>WidgetClass</span> <span class='hs-varid'>widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-467"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>KeyVal</span> <span class='hs-comment'>-- ^ @keyval@ - the mnemonic</span>
<a name="line-468"></a> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>widget</span> <span class='hs-comment'>-- ^ @target@ - the widget that gets activated by the mnemonic</span>
<a name="line-469"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-470"></a><span class='hs-definition'>windowAddMnemonic</span> <span class='hs-varid'>self</span> <span class='hs-varid'>keyval</span> <span class='hs-varid'>target</span> <span class='hs-keyglyph'>=</span>
<a name="line-471"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-layout'>(</span><span class='hs-conid'>Widget</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg3</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr3</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_add_mnemonic</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>argPtr3</span><span class='hs-layout'>)</span>
<a name="line-472"></a><span class='hs-comment'>{-# LINE 456 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-473"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-474"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>keyval</span><span class='hs-layout'>)</span>
<a name="line-475"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWidget</span> <span class='hs-varid'>target</span><span class='hs-layout'>)</span>
<a name="line-476"></a>
<a name="line-477"></a><a name="windowRemoveMnemonic"></a><span class='hs-comment'>-- | Removes a mnemonic from this window.</span>
<a name="line-478"></a><span class='hs-comment'>--</span>
<a name="line-479"></a><span class='hs-definition'>windowRemoveMnemonic</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span><span class='hs-layout'>,</span> <span class='hs-conid'>WidgetClass</span> <span class='hs-varid'>widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-480"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>KeyVal</span> <span class='hs-comment'>-- ^ @keyval@ - the mnemonic</span>
<a name="line-481"></a> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>widget</span> <span class='hs-comment'>-- ^ @target@ - the widget that gets activated by the mnemonic</span>
<a name="line-482"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-483"></a><span class='hs-definition'>windowRemoveMnemonic</span> <span class='hs-varid'>self</span> <span class='hs-varid'>keyval</span> <span class='hs-varid'>target</span> <span class='hs-keyglyph'>=</span>
<a name="line-484"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-layout'>(</span><span class='hs-conid'>Widget</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg3</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr3</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_remove_mnemonic</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>argPtr3</span><span class='hs-layout'>)</span>
<a name="line-485"></a><span class='hs-comment'>{-# LINE 468 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-486"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-487"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>keyval</span><span class='hs-layout'>)</span>
<a name="line-488"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWidget</span> <span class='hs-varid'>target</span><span class='hs-layout'>)</span>
<a name="line-489"></a>
<a name="line-490"></a><a name="windowMnemonicActivate"></a><span class='hs-comment'>-- | Activates the targets associated with the mnemonic.</span>
<a name="line-491"></a><span class='hs-definition'>windowMnemonicActivate</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-492"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>KeyVal</span> <span class='hs-comment'>-- ^ @keyval@ - the mnemonic</span>
<a name="line-493"></a> <span class='hs-keyglyph'>-></span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Modifier</span><span class='hs-keyglyph'>]</span> <span class='hs-comment'>-- ^ @modifier@ - the modifiers</span>
<a name="line-494"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ return @True@ if the activation is done.</span>
<a name="line-495"></a><span class='hs-definition'>windowMnemonicActivate</span> <span class='hs-varid'>self</span> <span class='hs-varid'>keyval</span> <span class='hs-varid'>modifier</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-496"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_mnemonic_activate</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span>
<a name="line-497"></a><span class='hs-comment'>{-# LINE 479 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-498"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-499"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>keyval</span><span class='hs-layout'>)</span>
<a name="line-500"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromFlags</span> <span class='hs-varid'>modifier</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-501"></a>
<a name="line-502"></a><a name="windowSetMnemonicModifier"></a><span class='hs-comment'>-- | Sets the mnemonic modifier for this window.</span>
<a name="line-503"></a><span class='hs-definition'>windowSetMnemonicModifier</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-504"></a> <span class='hs-keyglyph'>-></span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Modifier</span><span class='hs-keyglyph'>]</span> <span class='hs-comment'>-- ^ @modifier@ - the modifier mask used to activate mnemonics on this window.</span>
<a name="line-505"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-506"></a><span class='hs-definition'>windowSetMnemonicModifier</span> <span class='hs-varid'>self</span> <span class='hs-varid'>modifier</span> <span class='hs-keyglyph'>=</span>
<a name="line-507"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_mnemonic_modifier</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-508"></a><span class='hs-comment'>{-# LINE 489 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-509"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-510"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromFlags</span> <span class='hs-varid'>modifier</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-511"></a>
<a name="line-512"></a><a name="windowGetMnemonicModifier"></a><span class='hs-comment'>-- | Returns the mnemonic modifier for this window. See 'windowSetMnemonicModifier'.</span>
<a name="line-513"></a><span class='hs-definition'>windowGetMnemonicModifier</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-514"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Modifier</span><span class='hs-keyglyph'>]</span> <span class='hs-comment'>-- ^ return the modifier mask used to activate mnemonics on this window.</span>
<a name="line-515"></a><span class='hs-definition'>windowGetMnemonicModifier</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>liftM</span> <span class='hs-layout'>(</span><span class='hs-varid'>toFlags</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromIntegral</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-516"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_mnemonic_modifier</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-517"></a><span class='hs-comment'>{-# LINE 497 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-518"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-519"></a>
<a name="line-520"></a><a name="windowActivateKey"></a><span class='hs-comment'>-- | Activates mnemonics and accelerators for this 'Window'.</span>
<a name="line-521"></a><span class='hs-comment'>-- This is normally called by the default 'keyPressEvent' handler for toplevel windows,</span>
<a name="line-522"></a><span class='hs-comment'>-- however in some cases it may be useful to call this directly when overriding the standard key handling for a toplevel window.</span>
<a name="line-523"></a><span class='hs-comment'>--</span>
<a name="line-524"></a><span class='hs-definition'>windowActivateKey</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>EventM</span> <span class='hs-conid'>EKey</span> <span class='hs-conid'>Bool</span>
<a name="line-525"></a> <span class='hs-comment'>-- ^ return @True@ if a mnemonic or accelerator was found and activated.</span>
<a name="line-526"></a><span class='hs-definition'>windowActivateKey</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span> <span class='hs-keyword'>do</span>
<a name="line-527"></a> <span class='hs-varid'>ptr</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>ask</span>
<a name="line-528"></a> <span class='hs-varid'>liftIO</span> <span class='hs-varop'>$</span> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-529"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_activate_key</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-530"></a><span class='hs-comment'>{-# LINE 509 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-531"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-532"></a> <span class='hs-layout'>(</span><span class='hs-varid'>castPtr</span> <span class='hs-varid'>ptr</span><span class='hs-layout'>)</span>
<a name="line-533"></a>
<a name="line-534"></a><a name="windowPropagateKeyEvent"></a><span class='hs-comment'>-- | Propagate a key press or release event to the focus widget and up the focus container chain until a widget handles event.</span>
<a name="line-535"></a><span class='hs-comment'>-- This is normally called by the default 'keyPressEvent' and 'keyReleaseEvent' handlers for toplevel windows,</span>
<a name="line-536"></a><span class='hs-comment'>-- however in some cases it may be useful to call this directly when overriding the standard key handling for a toplevel window.</span>
<a name="line-537"></a><span class='hs-comment'>--</span>
<a name="line-538"></a><span class='hs-definition'>windowPropagateKeyEvent</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-539"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>EventM</span> <span class='hs-conid'>EKey</span> <span class='hs-conid'>Bool</span>
<a name="line-540"></a> <span class='hs-comment'>-- ^ return @True@ if a widget in the focus chain handled the event.</span>
<a name="line-541"></a><span class='hs-definition'>windowPropagateKeyEvent</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span> <span class='hs-keyword'>do</span>
<a name="line-542"></a> <span class='hs-varid'>ptr</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>ask</span>
<a name="line-543"></a> <span class='hs-varid'>liftIO</span> <span class='hs-varop'>$</span> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-544"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_propagate_key_event</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-545"></a><span class='hs-comment'>{-# LINE 523 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-546"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-547"></a> <span class='hs-layout'>(</span><span class='hs-varid'>castPtr</span> <span class='hs-varid'>ptr</span><span class='hs-layout'>)</span>
<a name="line-548"></a>
<a name="line-549"></a><a name="windowGetDefaultSize"></a><span class='hs-comment'>-- | Gets the default size of the window. A value of -1 for the width or</span>
<a name="line-550"></a><span class='hs-comment'>-- height indicates that a default size has not been explicitly set for that</span>
<a name="line-551"></a><span class='hs-comment'>-- dimension, so the \"natural\" size of the window will be used.</span>
<a name="line-552"></a><span class='hs-comment'>--</span>
<a name="line-553"></a><span class='hs-definition'>windowGetDefaultSize</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-554"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ @(width, height)@ - the default width and height</span>
<a name="line-555"></a><span class='hs-definition'>windowGetDefaultSize</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-556"></a> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>widthPtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-557"></a> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>heightPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-558"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_default_size</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span>
<a name="line-559"></a><span class='hs-comment'>{-# LINE 536 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-560"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-561"></a> <span class='hs-varid'>widthPtr</span>
<a name="line-562"></a> <span class='hs-varid'>heightPtr</span>
<a name="line-563"></a> <span class='hs-varid'>width</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>widthPtr</span>
<a name="line-564"></a> <span class='hs-varid'>height</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>heightPtr</span>
<a name="line-565"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>width</span><span class='hs-layout'>,</span> <span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span>
<a name="line-566"></a>
<a name="line-567"></a><a name="windowSetPosition"></a><span class='hs-comment'>-- | Sets a position constraint for this window. If the old or new constraint</span>
<a name="line-568"></a><span class='hs-comment'>-- is 'WinPosCenterAlways', this will also cause the window to be repositioned</span>
<a name="line-569"></a><span class='hs-comment'>-- to satisfy the new constraint.</span>
<a name="line-570"></a><span class='hs-comment'>--</span>
<a name="line-571"></a><span class='hs-definition'>windowSetPosition</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>WindowPosition</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-572"></a><span class='hs-definition'>windowSetPosition</span> <span class='hs-varid'>self</span> <span class='hs-varid'>position</span> <span class='hs-keyglyph'>=</span>
<a name="line-573"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_position</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-574"></a><span class='hs-comment'>{-# LINE 550 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-575"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-576"></a> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromEnum</span><span class='hs-layout'>)</span> <span class='hs-varid'>position</span><span class='hs-layout'>)</span>
<a name="line-577"></a>
<a name="line-578"></a><a name="windowSetTransientFor"></a><span class='hs-comment'>-- | Dialog windows should be set transient for the main application window</span>
<a name="line-579"></a><span class='hs-comment'>-- they were spawned from. This allows window managers to e.g. keep the dialog</span>
<a name="line-580"></a><span class='hs-comment'>-- on top of the main window, or center the dialog over the main window.</span>
<a name="line-581"></a><span class='hs-comment'>-- 'dialogNewWithButtons' and other convenience functions in Gtk+ will</span>
<a name="line-582"></a><span class='hs-comment'>-- sometimes call 'windowSetTransientFor' on your behalf.</span>
<a name="line-583"></a><span class='hs-comment'>--</span>
<a name="line-584"></a><span class='hs-comment'>-- On Windows, this function will and put the child window on top of the</span>
<a name="line-585"></a><span class='hs-comment'>-- parent, much as the window manager would have done on X.</span>
<a name="line-586"></a><span class='hs-comment'>--</span>
<a name="line-587"></a><span class='hs-comment'>-- Note that if you want to show a window @self@ on top of a full-screen window @parent@, you need to</span>
<a name="line-588"></a><span class='hs-comment'>-- turn the @self@ window into a dialog (using 'windowSetTypeHint' with 'WindowTypeHintDialog').</span>
<a name="line-589"></a><span class='hs-comment'>-- Otherwise the @parent@ window will always cover the @self@ window.</span>
<a name="line-590"></a><span class='hs-comment'>--</span>
<a name="line-591"></a><span class='hs-definition'>windowSetTransientFor</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span><span class='hs-layout'>,</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>parent</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-592"></a> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>parent</span> <span class='hs-comment'>-- ^ @parent@ - parent window</span>
<a name="line-593"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-594"></a><span class='hs-definition'>windowSetTransientFor</span> <span class='hs-varid'>self</span> <span class='hs-varid'>parent</span> <span class='hs-keyglyph'>=</span>
<a name="line-595"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_transient_for</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span><span class='hs-layout'>)</span>
<a name="line-596"></a><span class='hs-comment'>{-# LINE 571 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-597"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-598"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>parent</span><span class='hs-layout'>)</span>
<a name="line-599"></a>
<a name="line-600"></a><a name="windowGetTransientFor"></a><span class='hs-comment'>-- | Fetches the transient parent for this window. See</span>
<a name="line-601"></a><span class='hs-comment'>-- 'windowSetTransientFor'.</span>
<a name="line-602"></a><span class='hs-comment'>--</span>
<a name="line-603"></a><span class='hs-definition'>windowGetTransientFor</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-604"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ returns the transient parent for this window, or</span>
<a name="line-605"></a> <span class='hs-comment'>-- @Nothing@ if no transient parent has been set.</span>
<a name="line-606"></a><span class='hs-definition'>windowGetTransientFor</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-607"></a> <span class='hs-varid'>maybeNull</span> <span class='hs-layout'>(</span><span class='hs-varid'>makeNewObject</span> <span class='hs-varid'>mkWindow</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-608"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_transient_for</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-609"></a><span class='hs-comment'>{-# LINE 583 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-610"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-611"></a>
<a name="line-612"></a><a name="windowSetDestroyWithParent"></a><span class='hs-comment'>-- | If this setting is @True@, then destroying the transient parent of the</span>
<a name="line-613"></a><span class='hs-comment'>-- window will also destroy the window itself. This is useful for dialogs that</span>
<a name="line-614"></a><span class='hs-comment'>-- shouldn't persist beyond the lifetime of the main window they\'re associated</span>
<a name="line-615"></a><span class='hs-comment'>-- with, for example.</span>
<a name="line-616"></a><span class='hs-comment'>--</span>
<a name="line-617"></a><span class='hs-definition'>windowSetDestroyWithParent</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-618"></a><span class='hs-definition'>windowSetDestroyWithParent</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-619"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_destroy_with_parent</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-620"></a><span class='hs-comment'>{-# LINE 593 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-621"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-622"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-623"></a>
<a name="line-624"></a><a name="windowGetDestroyWithParent"></a><span class='hs-comment'>-- | Returns whether the window will be destroyed with its transient parent.</span>
<a name="line-625"></a><span class='hs-comment'>-- See 'windowSetDestroyWithParent'.</span>
<a name="line-626"></a><span class='hs-comment'>--</span>
<a name="line-627"></a><span class='hs-definition'>windowGetDestroyWithParent</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-628"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if the window will be destroyed with its</span>
<a name="line-629"></a> <span class='hs-comment'>-- transient parent.</span>
<a name="line-630"></a><span class='hs-definition'>windowGetDestroyWithParent</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-631"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-632"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_destroy_with_parent</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-633"></a><span class='hs-comment'>{-# LINE 605 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-634"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-635"></a>
<a name="line-636"></a>
<a name="line-637"></a><a name="windowIsActive"></a><span class='hs-comment'>-- | Returns whether the window is part of the current active toplevel. (That</span>
<a name="line-638"></a><span class='hs-comment'>-- is, the toplevel window receiving keystrokes.) The return value is @True@ if</span>
<a name="line-639"></a><span class='hs-comment'>-- the window is active toplevel itself, but also if it is, say, a 'Plug'</span>
<a name="line-640"></a><span class='hs-comment'>-- embedded in the active toplevel. You might use this function if you wanted</span>
<a name="line-641"></a><span class='hs-comment'>-- to draw a widget differently in an active window from a widget in an</span>
<a name="line-642"></a><span class='hs-comment'>-- inactive window. See 'windowHasToplevelFocus'</span>
<a name="line-643"></a><span class='hs-comment'>--</span>
<a name="line-644"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.4</span>
<a name="line-645"></a><span class='hs-comment'>--</span>
<a name="line-646"></a><span class='hs-definition'>windowIsActive</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-647"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if the window part of the current active</span>
<a name="line-648"></a> <span class='hs-comment'>-- window.</span>
<a name="line-649"></a><span class='hs-definition'>windowIsActive</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-650"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-651"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_is_active</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-652"></a><span class='hs-comment'>{-# LINE 623 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-653"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-654"></a>
<a name="line-655"></a><a name="windowHasToplevelFocus"></a><span class='hs-comment'>-- | Returns whether the input focus is within this 'Window'. For real</span>
<a name="line-656"></a><span class='hs-comment'>-- toplevel windows, this is identical to 'windowIsActive', but for embedded</span>
<a name="line-657"></a><span class='hs-comment'>-- windows, like 'Plug', the results will differ.</span>
<a name="line-658"></a><span class='hs-comment'>--</span>
<a name="line-659"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.4</span>
<a name="line-660"></a><span class='hs-comment'>--</span>
<a name="line-661"></a><span class='hs-definition'>windowHasToplevelFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-662"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if the the input focus is within this 'Window'</span>
<a name="line-663"></a><span class='hs-definition'>windowHasToplevelFocus</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-664"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-665"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_has_toplevel_focus</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-666"></a><span class='hs-comment'>{-# LINE 636 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-667"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-668"></a>
<a name="line-669"></a>
<a name="line-670"></a><a name="windowListToplevels"></a><span class='hs-comment'>-- | Returns a list of all existing toplevel windows.</span>
<a name="line-671"></a><span class='hs-comment'>--</span>
<a name="line-672"></a><span class='hs-definition'>windowListToplevels</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>IO</span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Window</span><span class='hs-keyglyph'>]</span>
<a name="line-673"></a><span class='hs-definition'>windowListToplevels</span> <span class='hs-keyglyph'>=</span> <span class='hs-keyword'>do</span>
<a name="line-674"></a> <span class='hs-varid'>glistPtr</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>gtk_window_list_toplevels</span>
<a name="line-675"></a><span class='hs-comment'>{-# LINE 644 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-676"></a> <span class='hs-varid'>winPtrs</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>fromGList</span> <span class='hs-varid'>glistPtr</span>
<a name="line-677"></a> <span class='hs-varid'>mapM</span> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>makeNewGObject</span> <span class='hs-varid'>mkWindow</span> <span class='hs-layout'>(</span><span class='hs-varid'>return</span> <span class='hs-varid'>ptr</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span> <span class='hs-varid'>winPtrs</span>
<a name="line-678"></a>
<a name="line-679"></a><a name="windowGetFocus"></a><span class='hs-comment'>-- | Retrieves the current focused widget within the window.</span>
<a name="line-680"></a><span class='hs-comment'>-- | Note that this is the widget that would have the focus if the toplevel</span>
<a name="line-681"></a><span class='hs-comment'>-- | window focused; if the toplevel window is not focused then</span>
<a name="line-682"></a><span class='hs-comment'>-- | 'widgetHasFocus' will not be True for the widget.</span>
<a name="line-683"></a><span class='hs-comment'>--</span>
<a name="line-684"></a><span class='hs-definition'>windowGetFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span>
<a name="line-685"></a><span class='hs-definition'>windowGetFocus</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-686"></a> <span class='hs-varid'>maybeNull</span> <span class='hs-layout'>(</span><span class='hs-varid'>makeNewObject</span> <span class='hs-varid'>mkWidget</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-687"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_focus</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-688"></a><span class='hs-comment'>{-# LINE 656 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-689"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-690"></a>
<a name="line-691"></a><a name="windowSetFocus"></a><span class='hs-comment'>-- | If focus is not the current focus widget, and is focusable, sets it as</span>
<a name="line-692"></a><span class='hs-comment'>-- | the focus widget for the window. If focus is Nothing, unsets the focus</span>
<a name="line-693"></a><span class='hs-comment'>-- | widget for this window. To set the focus to a particular widget in the</span>
<a name="line-694"></a><span class='hs-comment'>-- | toplevel, it is usually more convenient to use 'widgetGrabFocus' instead</span>
<a name="line-695"></a><span class='hs-comment'>-- | of this function.</span>
<a name="line-696"></a><span class='hs-comment'>--</span>
<a name="line-697"></a><span class='hs-definition'>windowSetFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span><span class='hs-layout'>,</span> <span class='hs-conid'>WidgetClass</span> <span class='hs-varid'>widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-698"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-varid'>widget</span>
<a name="line-699"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-700"></a><span class='hs-definition'>windowSetFocus</span> <span class='hs-varid'>self</span> <span class='hs-varid'>focus</span> <span class='hs-keyglyph'>=</span>
<a name="line-701"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>Widget</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_focus</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span><span class='hs-layout'>)</span>
<a name="line-702"></a><span class='hs-comment'>{-# LINE 669 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-703"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-704"></a> <span class='hs-layout'>(</span><span class='hs-varid'>maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Widget</span> <span class='hs-varid'>nullForeignPtr</span><span class='hs-layout'>)</span> <span class='hs-varid'>toWidget</span> <span class='hs-varid'>focus</span><span class='hs-layout'>)</span>
<a name="line-705"></a>
<a name="line-706"></a>
<a name="line-707"></a><a name="windowGetDefaultWidget"></a><span class='hs-comment'>-- | Returns the default widget for window. See 'windowSetDefault' for more details.</span>
<a name="line-708"></a><span class='hs-comment'>--</span>
<a name="line-709"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.14</span>
<a name="line-710"></a><span class='hs-comment'>--</span>
<a name="line-711"></a><span class='hs-definition'>windowGetDefaultWidget</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-712"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span>
<a name="line-713"></a><span class='hs-definition'>windowGetDefaultWidget</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-714"></a> <span class='hs-varid'>maybeNull</span> <span class='hs-layout'>(</span><span class='hs-varid'>makeNewObject</span> <span class='hs-varid'>mkWidget</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-715"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_default_widget</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-716"></a><span class='hs-comment'>{-# LINE 682 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-717"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-718"></a>
<a name="line-719"></a>
<a name="line-720"></a><a name="windowSetDefault"></a><span class='hs-comment'>-- | The default widget is the widget that's activated when the user presses</span>
<a name="line-721"></a><span class='hs-comment'>-- Enter in a dialog (for example). This function sets or unsets the default</span>
<a name="line-722"></a><span class='hs-comment'>-- widget for a Window about. When setting (rather than unsetting) the</span>
<a name="line-723"></a><span class='hs-comment'>-- default widget it's generally easier to call widgetGrabDefault on the</span>
<a name="line-724"></a><span class='hs-comment'>-- widget. Before making a widget the default widget, you must set the</span>
<a name="line-725"></a><span class='hs-comment'>-- 'widgetCanDefault' flag on the widget.</span>
<a name="line-726"></a><span class='hs-comment'>--</span>
<a name="line-727"></a><span class='hs-definition'>windowSetDefault</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span><span class='hs-layout'>,</span> <span class='hs-conid'>WidgetClass</span> <span class='hs-varid'>widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-728"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-varid'>widget</span>
<a name="line-729"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-730"></a><span class='hs-definition'>windowSetDefault</span> <span class='hs-varid'>self</span> <span class='hs-varid'>defaultWidget</span> <span class='hs-keyglyph'>=</span>
<a name="line-731"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>Widget</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_focus</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span><span class='hs-layout'>)</span>
<a name="line-732"></a><span class='hs-comment'>{-# LINE 697 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-733"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-734"></a> <span class='hs-layout'>(</span><span class='hs-varid'>maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Widget</span> <span class='hs-varid'>nullForeignPtr</span><span class='hs-layout'>)</span> <span class='hs-varid'>toWidget</span> <span class='hs-varid'>defaultWidget</span><span class='hs-layout'>)</span>
<a name="line-735"></a>
<a name="line-736"></a><a name="windowPresent"></a><span class='hs-comment'>-- | Presents a window to the user. This may mean raising the window in the</span>
<a name="line-737"></a><span class='hs-comment'>-- stacking order, deiconifying it, moving it to the current desktop, and\/or</span>
<a name="line-738"></a><span class='hs-comment'>-- giving it the keyboard focus, possibly dependent on the user's platform,</span>
<a name="line-739"></a><span class='hs-comment'>-- window manager, and preferences.</span>
<a name="line-740"></a><span class='hs-comment'>--</span>
<a name="line-741"></a><span class='hs-comment'>-- If @window@ is hidden, this function calls 'widgetShow' as well.</span>
<a name="line-742"></a><span class='hs-comment'>--</span>
<a name="line-743"></a><span class='hs-comment'>-- This function should be used when the user tries to open a window that's</span>
<a name="line-744"></a><span class='hs-comment'>-- already open. Say for example the preferences dialog is currently open, and</span>
<a name="line-745"></a><span class='hs-comment'>-- the user chooses Preferences from the menu a second time; use</span>
<a name="line-746"></a><span class='hs-comment'>-- 'windowPresent' to move the already-open dialog where the user can see it.</span>
<a name="line-747"></a><span class='hs-comment'>--</span>
<a name="line-748"></a><span class='hs-comment'>-- If you are calling this function in response to a user interaction, it is</span>
<a name="line-749"></a><span class='hs-comment'>-- preferable to use 'windowPresentWithTime'.</span>
<a name="line-750"></a><span class='hs-comment'>--</span>
<a name="line-751"></a><span class='hs-definition'>windowPresent</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-752"></a><span class='hs-definition'>windowPresent</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-753"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_present</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-754"></a><span class='hs-comment'>{-# LINE 718 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-755"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-756"></a>
<a name="line-757"></a><a name="windowDeiconify"></a><span class='hs-comment'>-- | Asks to deiconify (i.e. unminimize) the specified @window@. Note that you</span>
<a name="line-758"></a><span class='hs-comment'>-- shouldn't assume the window is definitely deiconified afterward, because</span>
<a name="line-759"></a><span class='hs-comment'>-- other entities (e.g. the user or window manager) could iconify it again</span>
<a name="line-760"></a><span class='hs-comment'>-- before your code which assumes deiconification gets to run.</span>
<a name="line-761"></a><span class='hs-comment'>--</span>
<a name="line-762"></a><span class='hs-comment'>-- You can track iconification via the 'windowStateEvent' signal on</span>
<a name="line-763"></a><span class='hs-comment'>-- 'Widget'.</span>
<a name="line-764"></a><span class='hs-comment'>--</span>
<a name="line-765"></a><span class='hs-definition'>windowDeiconify</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-766"></a><span class='hs-definition'>windowDeiconify</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-767"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_deiconify</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-768"></a><span class='hs-comment'>{-# LINE 731 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-769"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-770"></a>
<a name="line-771"></a><a name="windowIconify"></a><span class='hs-comment'>-- | Asks to iconify (i.e. minimize) the specified @window@. Note that you</span>
<a name="line-772"></a><span class='hs-comment'>-- shouldn't assume the window is definitely iconified afterward, because other</span>
<a name="line-773"></a><span class='hs-comment'>-- entities (e.g. the user or window manager) could deiconify it again, or</span>
<a name="line-774"></a><span class='hs-comment'>-- there may not be a window manager in which case iconification isn't</span>
<a name="line-775"></a><span class='hs-comment'>-- possible, etc. But normally the window will end up iconified. Just don't</span>
<a name="line-776"></a><span class='hs-comment'>-- write code that crashes if not.</span>
<a name="line-777"></a><span class='hs-comment'>--</span>
<a name="line-778"></a><span class='hs-comment'>-- It's permitted to call this function before showing a window, in which</span>
<a name="line-779"></a><span class='hs-comment'>-- case the window will be iconified before it ever appears onscreen.</span>
<a name="line-780"></a><span class='hs-comment'>--</span>
<a name="line-781"></a><span class='hs-comment'>-- You can track iconification via the 'windowStateEvent' signal on</span>
<a name="line-782"></a><span class='hs-comment'>-- 'Widget'.</span>
<a name="line-783"></a><span class='hs-comment'>--</span>
<a name="line-784"></a><span class='hs-definition'>windowIconify</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-785"></a><span class='hs-definition'>windowIconify</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-786"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_iconify</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-787"></a><span class='hs-comment'>{-# LINE 749 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-788"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-789"></a>
<a name="line-790"></a><a name="windowMaximize"></a><span class='hs-comment'>-- | Asks to maximize the window, so that it becomes full-screen. Note that you</span>
<a name="line-791"></a><span class='hs-comment'>-- shouldn't assume the window is definitely maximized afterward, because other</span>
<a name="line-792"></a><span class='hs-comment'>-- entities (e.g. the user or window manager) could unmaximize it again, and</span>
<a name="line-793"></a><span class='hs-comment'>-- not all window managers support maximization. But normally the window will</span>
<a name="line-794"></a><span class='hs-comment'>-- end up maximized. Just don't write code that crashes if not.</span>
<a name="line-795"></a><span class='hs-comment'>--</span>
<a name="line-796"></a><span class='hs-comment'>-- It's permitted to call this function before showing a window, in which</span>
<a name="line-797"></a><span class='hs-comment'>-- case the window will be maximized when it appears onscreen initially.</span>
<a name="line-798"></a><span class='hs-comment'>--</span>
<a name="line-799"></a><span class='hs-comment'>-- You can track maximization via the 'windowStateEvent' signal on</span>
<a name="line-800"></a><span class='hs-comment'>-- 'Widget'.</span>
<a name="line-801"></a><span class='hs-comment'>--</span>
<a name="line-802"></a><span class='hs-definition'>windowMaximize</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-803"></a><span class='hs-definition'>windowMaximize</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-804"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_maximize</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-805"></a><span class='hs-comment'>{-# LINE 766 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-806"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-807"></a>
<a name="line-808"></a><a name="windowUnmaximize"></a><span class='hs-comment'>-- | Asks to unmaximize the window. Note that you shouldn't assume the window is</span>
<a name="line-809"></a><span class='hs-comment'>-- definitely unmaximized afterward, because other entities (e.g. the user or</span>
<a name="line-810"></a><span class='hs-comment'>-- window manager) could maximize it again, and not all window managers honor</span>
<a name="line-811"></a><span class='hs-comment'>-- requests to unmaximize. But normally the window will end up unmaximized.</span>
<a name="line-812"></a><span class='hs-comment'>-- Just don't write code that crashes if not.</span>
<a name="line-813"></a><span class='hs-comment'>--</span>
<a name="line-814"></a><span class='hs-comment'>-- You can track maximization via the 'windowStateEvent' signal on</span>
<a name="line-815"></a><span class='hs-comment'>-- 'Widget'.</span>
<a name="line-816"></a><span class='hs-comment'>--</span>
<a name="line-817"></a><span class='hs-definition'>windowUnmaximize</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-818"></a><span class='hs-definition'>windowUnmaximize</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-819"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_unmaximize</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-820"></a><span class='hs-comment'>{-# LINE 780 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-821"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-822"></a>
<a name="line-823"></a>
<a name="line-824"></a><a name="windowFullscreen"></a><span class='hs-comment'>-- | Asks to place @window@ in the fullscreen state. Note that you shouldn't</span>
<a name="line-825"></a><span class='hs-comment'>-- assume the window is definitely full screen afterward, because other</span>
<a name="line-826"></a><span class='hs-comment'>-- entities (e.g. the user or window manager) could unfullscreen it again, and</span>
<a name="line-827"></a><span class='hs-comment'>-- not all window managers honor requests to fullscreen windows. But normally</span>
<a name="line-828"></a><span class='hs-comment'>-- the window will end up fullscreen. Just don't write code that crashes if</span>
<a name="line-829"></a><span class='hs-comment'>-- not.</span>
<a name="line-830"></a><span class='hs-comment'>--</span>
<a name="line-831"></a><span class='hs-comment'>-- You can track the fullscreen state via the 'windowStateEvent' signal</span>
<a name="line-832"></a><span class='hs-comment'>-- on 'Widget'.</span>
<a name="line-833"></a><span class='hs-comment'>--</span>
<a name="line-834"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-835"></a><span class='hs-comment'>--</span>
<a name="line-836"></a><span class='hs-definition'>windowFullscreen</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-837"></a><span class='hs-definition'>windowFullscreen</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-838"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_fullscreen</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-839"></a><span class='hs-comment'>{-# LINE 798 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-840"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-841"></a>
<a name="line-842"></a><a name="windowUnfullscreen"></a><span class='hs-comment'>-- | Asks to toggle off the fullscreen state for @window@. Note that you</span>
<a name="line-843"></a><span class='hs-comment'>-- shouldn't assume the window is definitely not full screen afterward, because</span>
<a name="line-844"></a><span class='hs-comment'>-- other entities (e.g. the user or window manager) could fullscreen it again,</span>
<a name="line-845"></a><span class='hs-comment'>-- and not all window managers honor requests to unfullscreen windows. But</span>
<a name="line-846"></a><span class='hs-comment'>-- normally the window will end up restored to its normal state. Just don't</span>
<a name="line-847"></a><span class='hs-comment'>-- write code that crashes if not.</span>
<a name="line-848"></a><span class='hs-comment'>--</span>
<a name="line-849"></a><span class='hs-comment'>-- You can track the fullscreen state via the 'windowStateEvent' signal</span>
<a name="line-850"></a><span class='hs-comment'>-- on 'Widget'.</span>
<a name="line-851"></a><span class='hs-comment'>--</span>
<a name="line-852"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-853"></a><span class='hs-comment'>--</span>
<a name="line-854"></a><span class='hs-definition'>windowUnfullscreen</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-855"></a><span class='hs-definition'>windowUnfullscreen</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-856"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_unfullscreen</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-857"></a><span class='hs-comment'>{-# LINE 815 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-858"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-859"></a>
<a name="line-860"></a>
<a name="line-861"></a><a name="windowSetKeepAbove"></a><span class='hs-comment'>-- | Asks to keep @window@ above, so that it stays on top. Note that you</span>
<a name="line-862"></a><span class='hs-comment'>-- shouldn't assume the window is definitely above afterward, because other</span>
<a name="line-863"></a><span class='hs-comment'>-- entities (e.g. the user or window manager) could not keep it above, and not</span>
<a name="line-864"></a><span class='hs-comment'>-- all window managers support keeping windows above. But normally the window</span>
<a name="line-865"></a><span class='hs-comment'>-- will end kept above. Just don't write code that crashes if not.</span>
<a name="line-866"></a><span class='hs-comment'>--</span>
<a name="line-867"></a><span class='hs-comment'>-- It's permitted to call this function before showing a window, in which</span>
<a name="line-868"></a><span class='hs-comment'>-- case the window will be kept above when it appears onscreen initially.</span>
<a name="line-869"></a><span class='hs-comment'>--</span>
<a name="line-870"></a><span class='hs-comment'>-- You can track the above state via the 'windowStateEvent' signal on</span>
<a name="line-871"></a><span class='hs-comment'>-- 'Widget'.</span>
<a name="line-872"></a><span class='hs-comment'>--</span>
<a name="line-873"></a><span class='hs-comment'>-- Note that, according to the Extended Window Manager Hints specification,</span>
<a name="line-874"></a><span class='hs-comment'>-- the above state is mainly meant for user preferences and should not be used</span>
<a name="line-875"></a><span class='hs-comment'>-- by applications e.g. for drawing attention to their dialogs.</span>
<a name="line-876"></a><span class='hs-comment'>--</span>
<a name="line-877"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.4</span>
<a name="line-878"></a><span class='hs-comment'>--</span>
<a name="line-879"></a><span class='hs-definition'>windowSetKeepAbove</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-880"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - whether to keep @window@ above other windows</span>
<a name="line-881"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-882"></a><span class='hs-definition'>windowSetKeepAbove</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-883"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_keep_above</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-884"></a><span class='hs-comment'>{-# LINE 841 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-885"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-886"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-887"></a>
<a name="line-888"></a><a name="windowSetKeepBelow"></a><span class='hs-comment'>-- | Asks to keep @window@ below, so that it stays in bottom. Note that you</span>
<a name="line-889"></a><span class='hs-comment'>-- shouldn't assume the window is definitely below afterward, because other</span>
<a name="line-890"></a><span class='hs-comment'>-- entities (e.g. the user or window manager) could not keep it below, and not</span>
<a name="line-891"></a><span class='hs-comment'>-- all window managers support putting windows below. But normally the window</span>
<a name="line-892"></a><span class='hs-comment'>-- will be kept below. Just don't write code that crashes if not.</span>
<a name="line-893"></a><span class='hs-comment'>--</span>
<a name="line-894"></a><span class='hs-comment'>-- It's permitted to call this function before showing a window, in which</span>
<a name="line-895"></a><span class='hs-comment'>-- case the window will be kept below when it appears onscreen initially.</span>
<a name="line-896"></a><span class='hs-comment'>--</span>
<a name="line-897"></a><span class='hs-comment'>-- You can track the below state via the 'windowStateEvent' signal on</span>
<a name="line-898"></a><span class='hs-comment'>-- 'Widget'.</span>
<a name="line-899"></a><span class='hs-comment'>--</span>
<a name="line-900"></a><span class='hs-comment'>-- Note that, according to the Extended Window Manager Hints specification,</span>
<a name="line-901"></a><span class='hs-comment'>-- the above state is mainly meant for user preferences and should not be used</span>
<a name="line-902"></a><span class='hs-comment'>-- by applications e.g. for drawing attention to their dialogs.</span>
<a name="line-903"></a><span class='hs-comment'>--</span>
<a name="line-904"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.4</span>
<a name="line-905"></a><span class='hs-comment'>--</span>
<a name="line-906"></a><span class='hs-definition'>windowSetKeepBelow</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-907"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - whether to keep @window@ below other windows</span>
<a name="line-908"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-909"></a><span class='hs-definition'>windowSetKeepBelow</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-910"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_keep_below</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-911"></a><span class='hs-comment'>{-# LINE 867 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-912"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-913"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-914"></a>
<a name="line-915"></a>
<a name="line-916"></a><a name="windowSetSkipTaskbarHint"></a><span class='hs-comment'>-- | Windows may set a hint asking the desktop environment not to display the</span>
<a name="line-917"></a><span class='hs-comment'>-- window in the task bar. This function sets this hint.</span>
<a name="line-918"></a><span class='hs-comment'>--</span>
<a name="line-919"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-920"></a><span class='hs-comment'>--</span>
<a name="line-921"></a><span class='hs-definition'>windowSetSkipTaskbarHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-922"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - @True@ to keep this window from appearing in the</span>
<a name="line-923"></a> <span class='hs-comment'>-- task bar</span>
<a name="line-924"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-925"></a><span class='hs-definition'>windowSetSkipTaskbarHint</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-926"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_skip_taskbar_hint</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-927"></a><span class='hs-comment'>{-# LINE 882 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-928"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-929"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-930"></a>
<a name="line-931"></a><a name="windowGetSkipTaskbarHint"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetSkipTaskbarHint'</span>
<a name="line-932"></a><span class='hs-comment'>--</span>
<a name="line-933"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-934"></a><span class='hs-comment'>--</span>
<a name="line-935"></a><span class='hs-definition'>windowGetSkipTaskbarHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-936"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if window shouldn't be in taskbar</span>
<a name="line-937"></a><span class='hs-definition'>windowGetSkipTaskbarHint</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-938"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-939"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_skip_taskbar_hint</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-940"></a><span class='hs-comment'>{-# LINE 894 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-941"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-942"></a>
<a name="line-943"></a><a name="windowSetSkipPagerHint"></a><span class='hs-comment'>-- | Windows may set a hint asking the desktop environment not to display the</span>
<a name="line-944"></a><span class='hs-comment'>-- window in the pager. This function sets this hint. (A \"pager\" is any</span>
<a name="line-945"></a><span class='hs-comment'>-- desktop navigation tool such as a workspace switcher that displays a</span>
<a name="line-946"></a><span class='hs-comment'>-- thumbnail representation of the windows on the screen.)</span>
<a name="line-947"></a><span class='hs-comment'>--</span>
<a name="line-948"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-949"></a><span class='hs-comment'>--</span>
<a name="line-950"></a><span class='hs-definition'>windowSetSkipPagerHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-951"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - @True@ to keep this window from appearing in the</span>
<a name="line-952"></a> <span class='hs-comment'>-- pager</span>
<a name="line-953"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-954"></a><span class='hs-definition'>windowSetSkipPagerHint</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-955"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_skip_pager_hint</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-956"></a><span class='hs-comment'>{-# LINE 909 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-957"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-958"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-959"></a>
<a name="line-960"></a><a name="windowGetSkipPagerHint"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetSkipPagerHint'.</span>
<a name="line-961"></a><span class='hs-comment'>--</span>
<a name="line-962"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-963"></a><span class='hs-comment'>--</span>
<a name="line-964"></a><span class='hs-definition'>windowGetSkipPagerHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-965"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if window shouldn't be in pager</span>
<a name="line-966"></a><span class='hs-definition'>windowGetSkipPagerHint</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-967"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-968"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_skip_pager_hint</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-969"></a><span class='hs-comment'>{-# LINE 921 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-970"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-971"></a>
<a name="line-972"></a>
<a name="line-973"></a>
<a name="line-974"></a><a name="windowSetAcceptFocus"></a><span class='hs-comment'>-- | Windows may set a hint asking the desktop environment not to receive the</span>
<a name="line-975"></a><span class='hs-comment'>-- input focus. This function sets this hint.</span>
<a name="line-976"></a><span class='hs-comment'>--</span>
<a name="line-977"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.4</span>
<a name="line-978"></a><span class='hs-comment'>--</span>
<a name="line-979"></a><span class='hs-definition'>windowSetAcceptFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-980"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - @True@ to let this window receive input focus</span>
<a name="line-981"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-982"></a><span class='hs-definition'>windowSetAcceptFocus</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-983"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_accept_focus</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-984"></a><span class='hs-comment'>{-# LINE 935 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-985"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-986"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-987"></a>
<a name="line-988"></a><a name="windowGetAcceptFocus"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetAcceptFocus'.</span>
<a name="line-989"></a><span class='hs-comment'>--</span>
<a name="line-990"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.4</span>
<a name="line-991"></a><span class='hs-comment'>--</span>
<a name="line-992"></a><span class='hs-definition'>windowGetAcceptFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-993"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if window should receive the input focus</span>
<a name="line-994"></a><span class='hs-definition'>windowGetAcceptFocus</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-995"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-996"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_accept_focus</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-997"></a><span class='hs-comment'>{-# LINE 947 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-998"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-999"></a>
<a name="line-1000"></a>
<a name="line-1001"></a>
<a name="line-1002"></a><a name="windowSetFocusOnMap"></a><span class='hs-comment'>-- | Windows may set a hint asking the desktop environment not to receive the</span>
<a name="line-1003"></a><span class='hs-comment'>-- input focus when the window is mapped. This function sets this hint.</span>
<a name="line-1004"></a><span class='hs-comment'>--</span>
<a name="line-1005"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.6</span>
<a name="line-1006"></a><span class='hs-comment'>--</span>
<a name="line-1007"></a><span class='hs-definition'>windowSetFocusOnMap</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1008"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - @True@ to let this window receive input focus on</span>
<a name="line-1009"></a> <span class='hs-comment'>-- map</span>
<a name="line-1010"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1011"></a><span class='hs-definition'>windowSetFocusOnMap</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-1012"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_focus_on_map</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1013"></a><span class='hs-comment'>{-# LINE 962 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1014"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1015"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-1016"></a>
<a name="line-1017"></a><a name="windowGetFocusOnMap"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetFocusOnMap'.</span>
<a name="line-1018"></a><span class='hs-comment'>--</span>
<a name="line-1019"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.6</span>
<a name="line-1020"></a><span class='hs-comment'>--</span>
<a name="line-1021"></a><span class='hs-definition'>windowGetFocusOnMap</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1022"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if window should receive the input focus when</span>
<a name="line-1023"></a> <span class='hs-comment'>-- mapped.</span>
<a name="line-1024"></a><span class='hs-definition'>windowGetFocusOnMap</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1025"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-1026"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_focus_on_map</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1027"></a><span class='hs-comment'>{-# LINE 975 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1028"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1029"></a>
<a name="line-1030"></a>
<a name="line-1031"></a>
<a name="line-1032"></a><a name="windowSetStartupId"></a><span class='hs-comment'>-- | Startup notification identifiers are used by desktop environment to track application startup,</span>
<a name="line-1033"></a><span class='hs-comment'>-- to provide user feedback and other features. This function changes the corresponding property on the underlying GdkWindow.</span>
<a name="line-1034"></a><span class='hs-comment'>-- Normally, startup identifier is managed automatically and you should only use this function in special cases like transferring focus from other processes. You should use this function before calling 'windowPresent' or any equivalent function generating a window map event.</span>
<a name="line-1035"></a><span class='hs-comment'>--</span>
<a name="line-1036"></a><span class='hs-comment'>-- This function is only useful on X11, not with other GTK+ targets.</span>
<a name="line-1037"></a><span class='hs-comment'>--</span>
<a name="line-1038"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.12</span>
<a name="line-1039"></a><span class='hs-comment'>--</span>
<a name="line-1040"></a><span class='hs-definition'>windowSetStartupId</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1041"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>String</span>
<a name="line-1042"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1043"></a><span class='hs-definition'>windowSetStartupId</span> <span class='hs-varid'>self</span> <span class='hs-varid'>startupId</span> <span class='hs-keyglyph'>=</span>
<a name="line-1044"></a> <span class='hs-varid'>withUTFString</span> <span class='hs-varid'>startupId</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>idPtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1045"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_startup_id</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1046"></a><span class='hs-comment'>{-# LINE 993 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1047"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1048"></a> <span class='hs-varid'>idPtr</span>
<a name="line-1049"></a>
<a name="line-1050"></a>
<a name="line-1051"></a><a name="windowSetDecorated"></a><span class='hs-comment'>-- | By default, windows are decorated with a title bar, resize controls, etc.</span>
<a name="line-1052"></a><span class='hs-comment'>-- Some window managers allow Gtk+ to disable these decorations, creating a</span>
<a name="line-1053"></a><span class='hs-comment'>-- borderless window. If you set the decorated property to @False@ using this</span>
<a name="line-1054"></a><span class='hs-comment'>-- function, Gtk+ will do its best to convince the window manager not to</span>
<a name="line-1055"></a><span class='hs-comment'>-- decorate the window. Depending on the system, this function may not have any</span>
<a name="line-1056"></a><span class='hs-comment'>-- effect when called on a window that is already visible, so you should call</span>
<a name="line-1057"></a><span class='hs-comment'>-- it before calling 'windowShow'.</span>
<a name="line-1058"></a><span class='hs-comment'>--</span>
<a name="line-1059"></a><span class='hs-comment'>-- On Windows, this function always works, since there's no window manager</span>
<a name="line-1060"></a><span class='hs-comment'>-- policy involved.</span>
<a name="line-1061"></a><span class='hs-comment'>--</span>
<a name="line-1062"></a><span class='hs-definition'>windowSetDecorated</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1063"></a><span class='hs-definition'>windowSetDecorated</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-1064"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_decorated</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1065"></a><span class='hs-comment'>{-# LINE 1011 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1066"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1067"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-1068"></a>
<a name="line-1069"></a><a name="windowGetDecorated"></a><span class='hs-comment'>-- | Returns whether the window has been set to have decorations such as a</span>
<a name="line-1070"></a><span class='hs-comment'>-- title bar via 'windowSetDecorated'.</span>
<a name="line-1071"></a><span class='hs-comment'>--</span>
<a name="line-1072"></a><span class='hs-definition'>windowGetDecorated</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1073"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if the window has been set to have decorations</span>
<a name="line-1074"></a><span class='hs-definition'>windowGetDecorated</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1075"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-1076"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_decorated</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1077"></a><span class='hs-comment'>{-# LINE 1022 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1078"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1079"></a>
<a name="line-1080"></a>
<a name="line-1081"></a><a name="windowSetDeletable"></a><span class='hs-comment'>-- | By default, windows have a close button in the window frame.</span>
<a name="line-1082"></a><span class='hs-comment'>-- Some window managers allow GTK+ to disable this button.</span>
<a name="line-1083"></a><span class='hs-comment'>-- If you set the deletable property to @False@ using this function, GTK+ will do its best to convince the window manager not to show a close button.</span>
<a name="line-1084"></a><span class='hs-comment'>-- Depending on the system, this function may not have any effect when called on a window that is already visible,</span>
<a name="line-1085"></a><span class='hs-comment'>-- so you should call it before calling 'windowShow'.</span>
<a name="line-1086"></a><span class='hs-comment'>--</span>
<a name="line-1087"></a><span class='hs-comment'>-- On Windows, this function always works, since there's no window manager policy involved.</span>
<a name="line-1088"></a><span class='hs-comment'>--</span>
<a name="line-1089"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.10</span>
<a name="line-1090"></a><span class='hs-comment'>--</span>
<a name="line-1091"></a><span class='hs-definition'>windowSetDeletable</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1092"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - @True@ to decorate the window as deletable</span>
<a name="line-1093"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1094"></a><span class='hs-definition'>windowSetDeletable</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-1095"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_deletable</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1096"></a><span class='hs-comment'>{-# LINE 1040 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1097"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1098"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-1099"></a>
<a name="line-1100"></a><a name="windowGetDeletable"></a><span class='hs-comment'>-- | Returns whether the window has been set to have a close button via 'windowSetDeletable'.</span>
<a name="line-1101"></a><span class='hs-comment'>--</span>
<a name="line-1102"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.10</span>
<a name="line-1103"></a><span class='hs-comment'>--</span>
<a name="line-1104"></a><span class='hs-definition'>windowGetDeletable</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1105"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ return @True@ if the window has been set to have a close button</span>
<a name="line-1106"></a><span class='hs-definition'>windowGetDeletable</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-1107"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_deletable</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1108"></a><span class='hs-comment'>{-# LINE 1051 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1109"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1110"></a>
<a name="line-1111"></a><a name="windowSetFrameDimensions"></a><span class='hs-comment'>-- | (Note: this is a special-purpose function intended for the framebuffer</span>
<a name="line-1112"></a><span class='hs-comment'>-- port; see 'windowSetHasFrame'. It will have no effect on the window border</span>
<a name="line-1113"></a><span class='hs-comment'>-- drawn by the window manager, which is the normal case when using the X</span>
<a name="line-1114"></a><span class='hs-comment'>-- Window system.)</span>
<a name="line-1115"></a><span class='hs-comment'>--</span>
<a name="line-1116"></a><span class='hs-comment'>-- For windows with frames (see 'windowSetHasFrame') this function can be</span>
<a name="line-1117"></a><span class='hs-comment'>-- used to change the size of the frame border.</span>
<a name="line-1118"></a><span class='hs-comment'>--</span>
<a name="line-1119"></a><span class='hs-definition'>windowSetFrameDimensions</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1120"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @left@ - The width of the left border</span>
<a name="line-1121"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @top@ - The height of the top border</span>
<a name="line-1122"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @right@ - The width of the right border</span>
<a name="line-1123"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @bottom@ - The height of the bottom border</span>
<a name="line-1124"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1125"></a><span class='hs-definition'>windowSetFrameDimensions</span> <span class='hs-varid'>self</span> <span class='hs-varid'>left</span> <span class='hs-varid'>top</span> <span class='hs-varid'>right</span> <span class='hs-varid'>bottom</span> <span class='hs-keyglyph'>=</span>
<a name="line-1126"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-varid'>arg5</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_frame_dimensions</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-varid'>arg5</span><span class='hs-layout'>)</span>
<a name="line-1127"></a><span class='hs-comment'>{-# LINE 1069 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1128"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1129"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>left</span><span class='hs-layout'>)</span>
<a name="line-1130"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>top</span><span class='hs-layout'>)</span>
<a name="line-1131"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>right</span><span class='hs-layout'>)</span>
<a name="line-1132"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>bottom</span><span class='hs-layout'>)</span>
<a name="line-1133"></a>
<a name="line-1134"></a><a name="windowGetFrameDimensions"></a><span class='hs-comment'>-- | Retrieves the dimensions of the frame window for this toplevel. See</span>
<a name="line-1135"></a><span class='hs-comment'>-- 'windowSetHasFrame', 'windowSetFrameDimensions'.</span>
<a name="line-1136"></a><span class='hs-comment'>--</span>
<a name="line-1137"></a><span class='hs-comment'>-- (Note: this is a special-purpose function intended for the framebuffer port;</span>
<a name="line-1138"></a><span class='hs-comment'>-- see 'windowSetHasFrame'.</span>
<a name="line-1139"></a><span class='hs-comment'>-- It will not return the size of the window border drawn by the window manager,</span>
<a name="line-1140"></a><span class='hs-comment'>-- which is the normal case when using a windowing system.</span>
<a name="line-1141"></a><span class='hs-comment'>-- See 'drawWindowGetFrameExtents' to get the standard window border extents.)</span>
<a name="line-1142"></a><span class='hs-comment'>--</span>
<a name="line-1143"></a><span class='hs-comment'>--</span>
<a name="line-1144"></a><span class='hs-comment'>--</span>
<a name="line-1145"></a><span class='hs-definition'>windowGetFrameDimensions</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1146"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>)</span>
<a name="line-1147"></a> <span class='hs-comment'>-- ^ returns @(left, top, right, bottom)@. @left@ is the</span>
<a name="line-1148"></a> <span class='hs-comment'>-- width of the frame at the left, @top@ is the height of the frame at the top, @right@</span>
<a name="line-1149"></a> <span class='hs-comment'>-- is the width of the frame at the right, @bottom@ is the height of the frame at the bottom.</span>
<a name="line-1150"></a><span class='hs-definition'>windowGetFrameDimensions</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1151"></a> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>lPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>tPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>rPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>bPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1152"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-varid'>arg5</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_frame_dimensions</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-varid'>arg5</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span> <span class='hs-varid'>lPtr</span> <span class='hs-varid'>tPtr</span> <span class='hs-varid'>rPtr</span> <span class='hs-varid'>bPtr</span>
<a name="line-1153"></a> <span class='hs-varid'>lv</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>lPtr</span>
<a name="line-1154"></a> <span class='hs-varid'>tv</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>tPtr</span>
<a name="line-1155"></a> <span class='hs-varid'>rv</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>rPtr</span>
<a name="line-1156"></a> <span class='hs-varid'>bv</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>bPtr</span>
<a name="line-1157"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>lv</span><span class='hs-layout'>,</span> <span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>tv</span><span class='hs-layout'>,</span> <span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>rv</span><span class='hs-layout'>,</span> <span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>bv</span><span class='hs-layout'>)</span>
<a name="line-1158"></a>
<a name="line-1159"></a><a name="windowSetHasFrame"></a><span class='hs-comment'>-- | If this function is called on a window with setting of @True@, before it is realized</span>
<a name="line-1160"></a><span class='hs-comment'>-- or showed, it will have a "frame" window around its 'DrawWindow',</span>
<a name="line-1161"></a><span class='hs-comment'>-- accessible using 'windowGetFrame'. Using the signal 'windowFrameEvent' you can</span>
<a name="line-1162"></a><span class='hs-comment'>-- receive all events targeted at the frame.</span>
<a name="line-1163"></a><span class='hs-comment'>--</span>
<a name="line-1164"></a><span class='hs-comment'>-- (Note: this is a special-purpose function for the framebuffer port, that causes GTK+ to draw its own window border.</span>
<a name="line-1165"></a><span class='hs-comment'>-- For most applications, you want 'windowSetDecorated' instead, which tells the window manager whether to draw the window border.)</span>
<a name="line-1166"></a><span class='hs-comment'>--</span>
<a name="line-1167"></a><span class='hs-comment'>-- This function is used by the 1 -fb port to implement managed windows,</span>
<a name="line-1168"></a><span class='hs-comment'>-- but it could conceivably be used by X-programs that want to do their own window</span>
<a name="line-1169"></a><span class='hs-comment'>-- decorations.</span>
<a name="line-1170"></a><span class='hs-comment'>--</span>
<a name="line-1171"></a><span class='hs-definition'>windowSetHasFrame</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1172"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - a boolean</span>
<a name="line-1173"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1174"></a><span class='hs-definition'>windowSetHasFrame</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-1175"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_has_frame</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1176"></a><span class='hs-comment'>{-# LINE 1117 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1177"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1178"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-1179"></a>
<a name="line-1180"></a><a name="windowGetHasFrame"></a><span class='hs-comment'>-- | Accessor for whether the window has a frame window exterior to window->window. Gets the value set by 'windowSetHasFrame'.</span>
<a name="line-1181"></a><span class='hs-comment'>--</span>
<a name="line-1182"></a><span class='hs-definition'>windowGetHasFrame</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1183"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ return @True@ if a frame has been added to the window via 'windowSetHasFrame'.</span>
<a name="line-1184"></a><span class='hs-definition'>windowGetHasFrame</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-1185"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_has_frame</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1186"></a><span class='hs-comment'>{-# LINE 1126 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1187"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1188"></a>
<a name="line-1189"></a><a name="windowSetRole"></a><span class='hs-comment'>-- | This function is only useful on X11, not with other Gtk+ targets.</span>
<a name="line-1190"></a><span class='hs-comment'>--</span>
<a name="line-1191"></a><span class='hs-comment'>-- In combination with the window title, the window role allows a window</span>
<a name="line-1192"></a><span class='hs-comment'>-- manager to identify \"the same\" window when an application is restarted. So</span>
<a name="line-1193"></a><span class='hs-comment'>-- for example you might set the \"toolbox\" role on your app's toolbox window,</span>
<a name="line-1194"></a><span class='hs-comment'>-- so that when the user restarts their session, the window manager can put the</span>
<a name="line-1195"></a><span class='hs-comment'>-- toolbox back in the same place.</span>
<a name="line-1196"></a><span class='hs-comment'>--</span>
<a name="line-1197"></a><span class='hs-comment'>-- If a window already has a unique title, you don't need to set the role,</span>
<a name="line-1198"></a><span class='hs-comment'>-- since the WM can use the title to identify the window when restoring the</span>
<a name="line-1199"></a><span class='hs-comment'>-- session.</span>
<a name="line-1200"></a><span class='hs-comment'>--</span>
<a name="line-1201"></a><span class='hs-definition'>windowSetRole</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1202"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>String</span> <span class='hs-comment'>-- ^ @role@ - unique identifier for the window to be used when</span>
<a name="line-1203"></a> <span class='hs-comment'>-- restoring a session</span>
<a name="line-1204"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1205"></a><span class='hs-definition'>windowSetRole</span> <span class='hs-varid'>self</span> <span class='hs-varid'>role</span> <span class='hs-keyglyph'>=</span>
<a name="line-1206"></a> <span class='hs-varid'>withUTFString</span> <span class='hs-varid'>role</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>rolePtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1207"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_role</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1208"></a><span class='hs-comment'>{-# LINE 1147 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1209"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1210"></a> <span class='hs-varid'>rolePtr</span>
<a name="line-1211"></a>
<a name="line-1212"></a><a name="windowGetRole"></a><span class='hs-comment'>-- | Returns the role of the window. See 'windowSetRole' for further</span>
<a name="line-1213"></a><span class='hs-comment'>-- explanation.</span>
<a name="line-1214"></a><span class='hs-comment'>--</span>
<a name="line-1215"></a><span class='hs-definition'>windowGetRole</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1216"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>String</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ returns the role of the window if set, or</span>
<a name="line-1217"></a> <span class='hs-comment'>-- @Nothing@.</span>
<a name="line-1218"></a><span class='hs-definition'>windowGetRole</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1219"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_role</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1220"></a><span class='hs-comment'>{-# LINE 1158 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1221"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1222"></a> <span class='hs-varop'>>>=</span> <span class='hs-varid'>maybePeek</span> <span class='hs-varid'>peekUTFString</span>
<a name="line-1223"></a>
<a name="line-1224"></a><a name="windowStick"></a><span class='hs-comment'>-- | Asks to stick @window@, which means that it will appear on all user</span>
<a name="line-1225"></a><span class='hs-comment'>-- desktops. Note that you shouldn't assume the window is definitely stuck</span>
<a name="line-1226"></a><span class='hs-comment'>-- afterward, because other entities (e.g. the user or window manager) could</span>
<a name="line-1227"></a><span class='hs-comment'>-- unstick it again, and some window managers do not support sticking windows.</span>
<a name="line-1228"></a><span class='hs-comment'>-- But normally the window will end up stuck. Just don't write code that</span>
<a name="line-1229"></a><span class='hs-comment'>-- crashes if not.</span>
<a name="line-1230"></a><span class='hs-comment'>--</span>
<a name="line-1231"></a><span class='hs-comment'>-- It's permitted to call this function before showing a window.</span>
<a name="line-1232"></a><span class='hs-comment'>--</span>
<a name="line-1233"></a><span class='hs-comment'>-- You can track stickiness via the 'windowStateEvent' signal on</span>
<a name="line-1234"></a><span class='hs-comment'>-- 'Widget'.</span>
<a name="line-1235"></a><span class='hs-comment'>--</span>
<a name="line-1236"></a><span class='hs-definition'>windowStick</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1237"></a><span class='hs-definition'>windowStick</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1238"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_stick</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1239"></a><span class='hs-comment'>{-# LINE 1176 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1240"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1241"></a>
<a name="line-1242"></a><a name="windowUnstick"></a><span class='hs-comment'>-- | Asks to unstick @window@, which means that it will appear on only one of</span>
<a name="line-1243"></a><span class='hs-comment'>-- the user's desktops. Note that you shouldn't assume the window is definitely</span>
<a name="line-1244"></a><span class='hs-comment'>-- unstuck afterward, because other entities (e.g. the user or window manager)</span>
<a name="line-1245"></a><span class='hs-comment'>-- could stick it again. But normally the window will end up stuck. Just don't</span>
<a name="line-1246"></a><span class='hs-comment'>-- write code that crashes if not.</span>
<a name="line-1247"></a><span class='hs-comment'>--</span>
<a name="line-1248"></a><span class='hs-comment'>-- You can track stickiness via the 'windowStateEvent' signal on</span>
<a name="line-1249"></a><span class='hs-comment'>-- 'Widget'.</span>
<a name="line-1250"></a><span class='hs-comment'>--</span>
<a name="line-1251"></a><span class='hs-definition'>windowUnstick</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1252"></a><span class='hs-definition'>windowUnstick</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1253"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_unstick</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1254"></a><span class='hs-comment'>{-# LINE 1190 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1255"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1256"></a>
<a name="line-1257"></a><a name="windowAddAccelGroup"></a><span class='hs-comment'>-- | Associate @accelGroup@ with @window@, such that calling</span>
<a name="line-1258"></a><span class='hs-comment'>-- 'accelGroupsActivate' on @window@ will activate accelerators in</span>
<a name="line-1259"></a><span class='hs-comment'>-- @accelGroup@.</span>
<a name="line-1260"></a><span class='hs-comment'>--</span>
<a name="line-1261"></a><span class='hs-definition'>windowAddAccelGroup</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1262"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>AccelGroup</span> <span class='hs-comment'>-- ^ @accelGroup@ - a 'AccelGroup'</span>
<a name="line-1263"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1264"></a><span class='hs-definition'>windowAddAccelGroup</span> <span class='hs-varid'>self</span> <span class='hs-varid'>accelGroup</span> <span class='hs-keyglyph'>=</span>
<a name="line-1265"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>AccelGroup</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_add_accel_group</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span><span class='hs-layout'>)</span>
<a name="line-1266"></a><span class='hs-comment'>{-# LINE 1201 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1267"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1268"></a> <span class='hs-varid'>accelGroup</span>
<a name="line-1269"></a>
<a name="line-1270"></a><a name="windowRemoveAccelGroup"></a><span class='hs-comment'>-- | Reverses the effects of 'windowAddAccelGroup'.</span>
<a name="line-1271"></a><span class='hs-comment'>--</span>
<a name="line-1272"></a><span class='hs-definition'>windowRemoveAccelGroup</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1273"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>AccelGroup</span> <span class='hs-comment'>-- ^ @accelGroup@ - a 'AccelGroup'</span>
<a name="line-1274"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1275"></a><span class='hs-definition'>windowRemoveAccelGroup</span> <span class='hs-varid'>self</span> <span class='hs-varid'>accelGroup</span> <span class='hs-keyglyph'>=</span>
<a name="line-1276"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>AccelGroup</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_remove_accel_group</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span><span class='hs-layout'>)</span>
<a name="line-1277"></a><span class='hs-comment'>{-# LINE 1211 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1278"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1279"></a> <span class='hs-varid'>accelGroup</span>
<a name="line-1280"></a>
<a name="line-1281"></a><a name="windowSetIcon"></a><span class='hs-comment'>-- | Sets up the icon representing a 'Window'. This icon is used when the</span>
<a name="line-1282"></a><span class='hs-comment'>-- window is minimized (also known as iconified). Some window managers or</span>
<a name="line-1283"></a><span class='hs-comment'>-- desktop environments may also place it in the window frame, or display it in</span>
<a name="line-1284"></a><span class='hs-comment'>-- other contexts.</span>
<a name="line-1285"></a><span class='hs-comment'>--</span>
<a name="line-1286"></a><span class='hs-comment'>-- The icon should be provided in whatever size it was naturally drawn; that</span>
<a name="line-1287"></a><span class='hs-comment'>-- is, don't scale the image before passing it to Gtk+. Scaling is postponed</span>
<a name="line-1288"></a><span class='hs-comment'>-- until the last minute, when the desired final size is known, to allow best</span>
<a name="line-1289"></a><span class='hs-comment'>-- quality.</span>
<a name="line-1290"></a><span class='hs-comment'>--</span>
<a name="line-1291"></a><span class='hs-comment'>-- If you have your icon hand-drawn in multiple sizes, use</span>
<a name="line-1292"></a><span class='hs-comment'>-- 'windowSetIconList'. Then the best size will be used.</span>
<a name="line-1293"></a><span class='hs-comment'>--</span>
<a name="line-1294"></a><span class='hs-comment'>-- This function is equivalent to calling 'windowSetIconList' with a</span>
<a name="line-1295"></a><span class='hs-comment'>-- 1-element list.</span>
<a name="line-1296"></a><span class='hs-comment'>--</span>
<a name="line-1297"></a><span class='hs-comment'>-- See also 'windowSetDefaultIconList' to set the icon for all windows in</span>
<a name="line-1298"></a><span class='hs-comment'>-- your application in one go.</span>
<a name="line-1299"></a><span class='hs-comment'>--</span>
<a name="line-1300"></a><span class='hs-definition'>windowSetIcon</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1301"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-conid'>Pixbuf</span> <span class='hs-comment'>-- ^ @icon@ - icon image</span>
<a name="line-1302"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1303"></a><span class='hs-definition'>windowSetIcon</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Nothing</span> <span class='hs-keyglyph'>=</span>
<a name="line-1304"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>Pixbuf</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_icon</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span><span class='hs-layout'>)</span>
<a name="line-1305"></a><span class='hs-comment'>{-# LINE 1238 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1306"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1307"></a> <span class='hs-layout'>(</span><span class='hs-conid'>Pixbuf</span> <span class='hs-varid'>nullForeignPtr</span><span class='hs-layout'>)</span>
<a name="line-1308"></a><span class='hs-definition'>windowSetIcon</span> <span class='hs-varid'>self</span> <span class='hs-layout'>(</span><span class='hs-conid'>Just</span> <span class='hs-varid'>icon</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=</span>
<a name="line-1309"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>Pixbuf</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_icon</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span><span class='hs-layout'>)</span>
<a name="line-1310"></a><span class='hs-comment'>{-# LINE 1242 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1311"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1312"></a> <span class='hs-varid'>icon</span>
<a name="line-1313"></a>
<a name="line-1314"></a><a name="windowGetIcon"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetIcon' (or if you\'ve called</span>
<a name="line-1315"></a><span class='hs-comment'>-- 'windowSetIconList', gets the first icon in the icon list).</span>
<a name="line-1316"></a><span class='hs-comment'>--</span>
<a name="line-1317"></a><span class='hs-definition'>windowGetIcon</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1318"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>Pixbuf</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ returns icon for window, or @Nothing@ if none was set</span>
<a name="line-1319"></a><span class='hs-definition'>windowGetIcon</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1320"></a> <span class='hs-varid'>maybeNull</span> <span class='hs-layout'>(</span><span class='hs-varid'>makeNewGObject</span> <span class='hs-varid'>mkPixbuf</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-1321"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_icon</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1322"></a><span class='hs-comment'>{-# LINE 1253 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1323"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1324"></a>
<a name="line-1325"></a><a name="windowSetIconList"></a><span class='hs-comment'>-- | Sets up the icon representing a 'Window'. The icon is used when the window is minimized (also known as iconified).</span>
<a name="line-1326"></a><span class='hs-comment'>-- Some window managers or desktop environments may also place it in the window frame, or display it in other contexts.</span>
<a name="line-1327"></a><span class='hs-comment'>--</span>
<a name="line-1328"></a><span class='hs-comment'>-- 'windowSetIconList' allows you to pass in the same icon in several hand-drawn sizes.</span>
<a name="line-1329"></a><span class='hs-comment'>-- The list should contain the natural sizes your icon is available in; that is, don't scale the image before passing it to GTK+. </span>
<a name="line-1330"></a><span class='hs-comment'>-- Scaling is postponed until the last minute, when the desired final size is known, to allow best quality.</span>
<a name="line-1331"></a><span class='hs-comment'>--</span>
<a name="line-1332"></a><span class='hs-comment'>-- By passing several sizes, you may improve the final image quality of the icon, by reducing or eliminating automatic image scaling.</span>
<a name="line-1333"></a><span class='hs-comment'>--</span>
<a name="line-1334"></a><span class='hs-comment'>-- Recommended sizes to provide: 16x16, 32x32, 48x48 at minimum, and larger images (64x64, 128x128) if you have them.</span>
<a name="line-1335"></a><span class='hs-comment'>--</span>
<a name="line-1336"></a><span class='hs-comment'>-- See also 'windowSetDefaultIconList' to set the icon for all windows in your application in one go.</span>
<a name="line-1337"></a><span class='hs-comment'>--</span>
<a name="line-1338"></a><span class='hs-comment'>-- Note that transient windows (those who have been set transient for another window using 'windowSetTransientFor' will inherit their icon from their</span>
<a name="line-1339"></a><span class='hs-comment'>-- transient parent.</span>
<a name="line-1340"></a><span class='hs-comment'>-- So there's no need to explicitly set the icon on transient windows.</span>
<a name="line-1341"></a><span class='hs-comment'>--</span>
<a name="line-1342"></a><span class='hs-definition'>windowSetIconList</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1343"></a> <span class='hs-keyglyph'>-></span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Pixbuf</span><span class='hs-keyglyph'>]</span>
<a name="line-1344"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1345"></a><span class='hs-definition'>windowSetIconList</span> <span class='hs-varid'>self</span> <span class='hs-varid'>list</span> <span class='hs-keyglyph'>=</span>
<a name="line-1346"></a> <span class='hs-varid'>withForeignPtrs</span> <span class='hs-layout'>(</span><span class='hs-varid'>map</span> <span class='hs-varid'>unPixbuf</span> <span class='hs-varid'>list</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>ptrList</span> <span class='hs-keyglyph'>-></span>
<a name="line-1347"></a> <span class='hs-varid'>withGList</span> <span class='hs-varid'>ptrList</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>glist</span> <span class='hs-keyglyph'>-></span>
<a name="line-1348"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_icon_list</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1349"></a><span class='hs-comment'>{-# LINE 1279 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1350"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1351"></a> <span class='hs-varid'>glist</span>
<a name="line-1352"></a>
<a name="line-1353"></a><a name="windowGetIconList"></a><span class='hs-comment'>-- | Retrieves the list of icons set by 'windowSetIconList'.</span>
<a name="line-1354"></a><span class='hs-comment'>--</span>
<a name="line-1355"></a><span class='hs-definition'>windowGetIconList</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1356"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Pixbuf</span><span class='hs-keyglyph'>]</span>
<a name="line-1357"></a><span class='hs-definition'>windowGetIconList</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span> <span class='hs-keyword'>do</span>
<a name="line-1358"></a> <span class='hs-varid'>glist</span> <span class='hs-keyglyph'><-</span> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_icon_list</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1359"></a> <span class='hs-varid'>ptrList</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>fromGList</span> <span class='hs-varid'>glist</span>
<a name="line-1360"></a> <span class='hs-varid'>mapM</span> <span class='hs-layout'>(</span><span class='hs-varid'>makeNewGObject</span> <span class='hs-varid'>mkPixbuf</span> <span class='hs-varop'>.</span> <span class='hs-varid'>return</span><span class='hs-layout'>)</span> <span class='hs-varid'>ptrList</span>
<a name="line-1361"></a>
<a name="line-1362"></a><a name="windowSetDefaultIconList"></a><span class='hs-comment'>-- | Sets an icon list to be used as fallback for windows that haven't had 'windowSetIconList' called on them to set up a window-specific icon list. </span>
<a name="line-1363"></a><span class='hs-comment'>-- This function allows you to set up the icon for all windows in your app at once.</span>
<a name="line-1364"></a><span class='hs-comment'>--</span>
<a name="line-1365"></a><span class='hs-comment'>-- See 'windowSetIconList' for more details.</span>
<a name="line-1366"></a><span class='hs-comment'>--</span>
<a name="line-1367"></a><span class='hs-definition'>windowSetDefaultIconList</span> <span class='hs-keyglyph'>::</span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Pixbuf</span><span class='hs-keyglyph'>]</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1368"></a><span class='hs-definition'>windowSetDefaultIconList</span> <span class='hs-varid'>list</span> <span class='hs-keyglyph'>=</span>
<a name="line-1369"></a> <span class='hs-varid'>withForeignPtrs</span> <span class='hs-layout'>(</span><span class='hs-varid'>map</span> <span class='hs-varid'>unPixbuf</span> <span class='hs-varid'>list</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>ptrList</span> <span class='hs-keyglyph'>-></span>
<a name="line-1370"></a> <span class='hs-varid'>withGList</span> <span class='hs-varid'>ptrList</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>glist</span> <span class='hs-keyglyph'>-></span>
<a name="line-1371"></a> <span class='hs-varid'>gtk_window_set_default_icon_list</span> <span class='hs-varid'>glist</span>
<a name="line-1372"></a>
<a name="line-1373"></a><a name="windowGetDefaultIconList"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetDefaultIconList'.</span>
<a name="line-1374"></a><span class='hs-comment'>--</span>
<a name="line-1375"></a><span class='hs-definition'>windowGetDefaultIconList</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>IO</span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Pixbuf</span><span class='hs-keyglyph'>]</span>
<a name="line-1376"></a><span class='hs-definition'>windowGetDefaultIconList</span> <span class='hs-keyglyph'>=</span> <span class='hs-keyword'>do</span>
<a name="line-1377"></a> <span class='hs-varid'>glist</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>gtk_window_get_default_icon_list</span>
<a name="line-1378"></a><span class='hs-comment'>{-# LINE 1307 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1379"></a> <span class='hs-varid'>ptrList</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>fromGList</span> <span class='hs-varid'>glist</span>
<a name="line-1380"></a> <span class='hs-varid'>mapM</span> <span class='hs-layout'>(</span><span class='hs-varid'>makeNewGObject</span> <span class='hs-varid'>mkPixbuf</span> <span class='hs-varop'>.</span> <span class='hs-varid'>return</span><span class='hs-layout'>)</span> <span class='hs-varid'>ptrList</span>
<a name="line-1381"></a>
<a name="line-1382"></a>
<a name="line-1383"></a><a name="windowSetIconName"></a><span class='hs-comment'>-- | Sets the icon for the window from a named themed icon. See the docs for</span>
<a name="line-1384"></a><span class='hs-comment'>-- 'IconTheme' for more details.</span>
<a name="line-1385"></a><span class='hs-comment'>--</span>
<a name="line-1386"></a><span class='hs-comment'>-- Note that this has nothing to do with the WM_ICON_NAME property which is</span>
<a name="line-1387"></a><span class='hs-comment'>-- mentioned in the ICCCM.</span>
<a name="line-1388"></a><span class='hs-comment'>--</span>
<a name="line-1389"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.6</span>
<a name="line-1390"></a><span class='hs-comment'>--</span>
<a name="line-1391"></a><span class='hs-definition'>windowSetIconName</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1392"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>String</span> <span class='hs-comment'>-- ^ @name@ - the name of the themed icon</span>
<a name="line-1393"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1394"></a><span class='hs-definition'>windowSetIconName</span> <span class='hs-varid'>self</span> <span class='hs-varid'>name</span> <span class='hs-keyglyph'>=</span>
<a name="line-1395"></a> <span class='hs-varid'>withUTFString</span> <span class='hs-varid'>name</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>namePtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1396"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_icon_name</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1397"></a><span class='hs-comment'>{-# LINE 1325 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1398"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1399"></a> <span class='hs-varid'>namePtr</span>
<a name="line-1400"></a>
<a name="line-1401"></a><a name="windowGetIconName"></a><span class='hs-comment'>-- | Returns the name of the themed icon for the window, see</span>
<a name="line-1402"></a><span class='hs-comment'>-- 'windowSetIconName'.</span>
<a name="line-1403"></a><span class='hs-comment'>--</span>
<a name="line-1404"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.6</span>
<a name="line-1405"></a><span class='hs-comment'>--</span>
<a name="line-1406"></a><span class='hs-definition'>windowGetIconName</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1407"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>String</span> <span class='hs-comment'>-- ^ returns the icon name or @\"\"@ if the window has no themed</span>
<a name="line-1408"></a> <span class='hs-comment'>-- icon.</span>
<a name="line-1409"></a><span class='hs-definition'>windowGetIconName</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1410"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_icon_name</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1411"></a><span class='hs-comment'>{-# LINE 1338 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1412"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1413"></a> <span class='hs-varop'>>>=</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>strPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>if</span> <span class='hs-varid'>strPtr</span> <span class='hs-varop'>==</span> <span class='hs-varid'>nullPtr</span>
<a name="line-1414"></a> <span class='hs-keyword'>then</span> <span class='hs-varid'>return</span> <span class='hs-str'>""</span>
<a name="line-1415"></a> <span class='hs-keyword'>else</span> <span class='hs-varid'>peekUTFString</span> <span class='hs-varid'>strPtr</span>
<a name="line-1416"></a>
<a name="line-1417"></a><a name="windowSetDefaultIconName"></a><span class='hs-comment'>-- | Sets an icon to be used as fallback for windows that haven't had</span>
<a name="line-1418"></a><span class='hs-comment'>-- 'windowSetIconList' called on them from a named themed icon, see</span>
<a name="line-1419"></a><span class='hs-comment'>-- 'windowSetIconName'.</span>
<a name="line-1420"></a><span class='hs-comment'>--</span>
<a name="line-1421"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.6</span>
<a name="line-1422"></a><span class='hs-comment'>--</span>
<a name="line-1423"></a><span class='hs-definition'>windowSetDefaultIconName</span> <span class='hs-keyglyph'>::</span>
<a name="line-1424"></a> <span class='hs-conid'>String</span> <span class='hs-comment'>-- ^ @name@ - the name of the themed icon</span>
<a name="line-1425"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1426"></a><span class='hs-definition'>windowSetDefaultIconName</span> <span class='hs-varid'>name</span> <span class='hs-keyglyph'>=</span>
<a name="line-1427"></a> <span class='hs-varid'>withUTFString</span> <span class='hs-varid'>name</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>namePtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1428"></a> <span class='hs-varid'>gtk_window_set_default_icon_name</span>
<a name="line-1429"></a><span class='hs-comment'>{-# LINE 1355 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1430"></a> <span class='hs-varid'>namePtr</span>
<a name="line-1431"></a>
<a name="line-1432"></a>
<a name="line-1433"></a>
<a name="line-1434"></a><a name="windowSetDefaultIcon"></a><span class='hs-comment'>-- | Sets an icon to be used as fallback for windows that haven't had 'windowSetIcon' called on them from a pixbuf.</span>
<a name="line-1435"></a><span class='hs-comment'>--</span>
<a name="line-1436"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.4</span>
<a name="line-1437"></a><span class='hs-comment'>--</span>
<a name="line-1438"></a><span class='hs-definition'>windowSetDefaultIcon</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>Maybe</span> <span class='hs-conid'>Pixbuf</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1439"></a><span class='hs-definition'>windowSetDefaultIcon</span> <span class='hs-layout'>(</span><span class='hs-conid'>Just</span> <span class='hs-varid'>icon</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=</span>
<a name="line-1440"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Pixbuf</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_default_icon</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span> <span class='hs-varid'>icon</span>
<a name="line-1441"></a><span class='hs-definition'>windowSetDefaultIcon</span> <span class='hs-conid'>Nothing</span> <span class='hs-keyglyph'>=</span>
<a name="line-1442"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Pixbuf</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_default_icon</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>Pixbuf</span> <span class='hs-varid'>nullForeignPtr</span><span class='hs-layout'>)</span>
<a name="line-1443"></a>
<a name="line-1444"></a>
<a name="line-1445"></a>
<a name="line-1446"></a><a name="windowSetDefaultIconFromFile"></a><span class='hs-comment'>-- | Sets an icon to be used as fallback for windows that haven't had</span>
<a name="line-1447"></a><span class='hs-comment'>-- 'windowSetIconList' called on them from a file on disk. May throw a 'GError' if</span>
<a name="line-1448"></a><span class='hs-comment'>-- the file cannot be loaded.</span>
<a name="line-1449"></a><span class='hs-comment'>--</span>
<a name="line-1450"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-1451"></a><span class='hs-comment'>--</span>
<a name="line-1452"></a><span class='hs-definition'>windowSetDefaultIconFromFile</span> <span class='hs-keyglyph'>::</span>
<a name="line-1453"></a> <span class='hs-conid'>String</span> <span class='hs-comment'>-- ^ @filename@ - location of icon file</span>
<a name="line-1454"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if setting the icon succeeded.</span>
<a name="line-1455"></a><span class='hs-definition'>windowSetDefaultIconFromFile</span> <span class='hs-varid'>filename</span> <span class='hs-keyglyph'>=</span>
<a name="line-1456"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-1457"></a> <span class='hs-varid'>propagateGError</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>errPtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1458"></a> <span class='hs-varid'>withUTFString</span> <span class='hs-varid'>filename</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>filenamePtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1459"></a> <span class='hs-varid'>gtk_window_set_default_icon_from_file</span>
<a name="line-1460"></a><span class='hs-comment'>{-# LINE 1385 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1461"></a> <span class='hs-varid'>filenamePtr</span>
<a name="line-1462"></a> <span class='hs-varid'>errPtr</span>
<a name="line-1463"></a>
<a name="line-1464"></a>
<a name="line-1465"></a>
<a name="line-1466"></a><a name="windowGetDefaultIconName"></a><span class='hs-comment'>-- | Returns the fallback icon name for windows that has been set with</span>
<a name="line-1467"></a><span class='hs-comment'>-- 'windowSetDefaultIconName'.</span>
<a name="line-1468"></a><span class='hs-comment'>--</span>
<a name="line-1469"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.16</span>
<a name="line-1470"></a><span class='hs-comment'>--</span>
<a name="line-1471"></a><span class='hs-definition'>windowGetDefaultIconName</span> <span class='hs-keyglyph'>::</span>
<a name="line-1472"></a> <span class='hs-conid'>IO</span> <span class='hs-conid'>String</span> <span class='hs-comment'>-- ^ returns the fallback icon name for windows</span>
<a name="line-1473"></a><span class='hs-definition'>windowGetDefaultIconName</span> <span class='hs-keyglyph'>=</span>
<a name="line-1474"></a> <span class='hs-varid'>gtk_window_get_default_icon_name</span>
<a name="line-1475"></a><span class='hs-comment'>{-# LINE 1399 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1476"></a> <span class='hs-varop'>>>=</span> <span class='hs-varid'>peekUTFString</span>
<a name="line-1477"></a>
<a name="line-1478"></a>
<a name="line-1479"></a>
<a name="line-1480"></a><a name="windowSetScreen"></a><span class='hs-comment'>-- | Sets the 'Screen' where the @window@ is displayed; if the window is</span>
<a name="line-1481"></a><span class='hs-comment'>-- already mapped, it will be unmapped, and then remapped on the new screen.</span>
<a name="line-1482"></a><span class='hs-comment'>--</span>
<a name="line-1483"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-1484"></a><span class='hs-comment'>--</span>
<a name="line-1485"></a><span class='hs-definition'>windowSetScreen</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1486"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Screen</span> <span class='hs-comment'>-- ^ @screen@ - a 'Screen'.</span>
<a name="line-1487"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1488"></a><span class='hs-definition'>windowSetScreen</span> <span class='hs-varid'>self</span> <span class='hs-varid'>screen</span> <span class='hs-keyglyph'>=</span>
<a name="line-1489"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>Screen</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_screen</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span><span class='hs-layout'>)</span>
<a name="line-1490"></a><span class='hs-comment'>{-# LINE 1413 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1491"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1492"></a> <span class='hs-varid'>screen</span>
<a name="line-1493"></a>
<a name="line-1494"></a><a name="windowGetScreen"></a><span class='hs-comment'>-- | Returns the 'Screen' associated with the window.</span>
<a name="line-1495"></a><span class='hs-comment'>--</span>
<a name="line-1496"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-1497"></a><span class='hs-comment'>--</span>
<a name="line-1498"></a><span class='hs-definition'>windowGetScreen</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1499"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Screen</span> <span class='hs-comment'>-- ^ returns a 'Screen'.</span>
<a name="line-1500"></a><span class='hs-definition'>windowGetScreen</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1501"></a> <span class='hs-varid'>makeNewGObject</span> <span class='hs-varid'>mkScreen</span> <span class='hs-varop'>$</span>
<a name="line-1502"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_screen</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1503"></a><span class='hs-comment'>{-# LINE 1425 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1504"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1505"></a>
<a name="line-1506"></a><a name="windowSetIconFromFile"></a><span class='hs-comment'>-- | Sets the icon for @window@.</span>
<a name="line-1507"></a><span class='hs-comment'>--</span>
<a name="line-1508"></a><span class='hs-comment'>-- This function is equivalent to calling 'windowSetIcon' with a pixbuf</span>
<a name="line-1509"></a><span class='hs-comment'>-- created by loading the image from @filename@.</span>
<a name="line-1510"></a><span class='hs-comment'>--</span>
<a name="line-1511"></a><span class='hs-comment'>-- This may throw an exception if the file cannot be loaded.</span>
<a name="line-1512"></a><span class='hs-comment'>--</span>
<a name="line-1513"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-1514"></a><span class='hs-comment'>--</span>
<a name="line-1515"></a><span class='hs-definition'>windowSetIconFromFile</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1516"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>FilePath</span> <span class='hs-comment'>-- ^ @filename@ - location of icon file</span>
<a name="line-1517"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1518"></a><span class='hs-definition'>windowSetIconFromFile</span> <span class='hs-varid'>self</span> <span class='hs-varid'>filename</span> <span class='hs-keyglyph'>=</span>
<a name="line-1519"></a> <span class='hs-varid'>propagateGError</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>errPtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1520"></a> <span class='hs-varid'>withUTFString</span> <span class='hs-varid'>filename</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>filenamePtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1521"></a>
<a name="line-1522"></a>
<a name="line-1523"></a>
<a name="line-1524"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_icon_from_file</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span>
<a name="line-1525"></a><span class='hs-comment'>{-# LINE 1446 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1526"></a>
<a name="line-1527"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1528"></a> <span class='hs-varid'>filenamePtr</span>
<a name="line-1529"></a> <span class='hs-varid'>errPtr</span>
<a name="line-1530"></a> <span class='hs-varid'>return</span> <span class='hs-conid'>()</span>
<a name="line-1531"></a>
<a name="line-1532"></a><a name="windowSetAutoStartupNotification"></a><span class='hs-comment'>-- | By default, after showing the first 'Window' for each 'Screen', Gtk+</span>
<a name="line-1533"></a><span class='hs-comment'>-- calls 'screenNotifyStartupComplete'. Call this function to disable the</span>
<a name="line-1534"></a><span class='hs-comment'>-- automatic startup notification. You might do this if your first window is a</span>
<a name="line-1535"></a><span class='hs-comment'>-- splash screen, and you want to delay notification until after your real main</span>
<a name="line-1536"></a><span class='hs-comment'>-- window has been shown, for example.</span>
<a name="line-1537"></a><span class='hs-comment'>--</span>
<a name="line-1538"></a><span class='hs-comment'>-- In that example, you would disable startup notification temporarily, show</span>
<a name="line-1539"></a><span class='hs-comment'>-- your splash screen, then re-enable it so that showing the main window would</span>
<a name="line-1540"></a><span class='hs-comment'>-- automatically result in notification.</span>
<a name="line-1541"></a><span class='hs-comment'>--</span>
<a name="line-1542"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.2</span>
<a name="line-1543"></a><span class='hs-comment'>--</span>
<a name="line-1544"></a><span class='hs-definition'>windowSetAutoStartupNotification</span> <span class='hs-keyglyph'>::</span>
<a name="line-1545"></a> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - @True@ to automatically do startup notification</span>
<a name="line-1546"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1547"></a><span class='hs-definition'>windowSetAutoStartupNotification</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-1548"></a> <span class='hs-varid'>gtk_window_set_auto_startup_notification</span>
<a name="line-1549"></a><span class='hs-comment'>{-# LINE 1469 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1550"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-1551"></a>
<a name="line-1552"></a>
<a name="line-1553"></a><a name="windowSetGravity"></a><span class='hs-comment'>-- | Window gravity defines the meaning of coordinates passed to 'windowMove'.</span>
<a name="line-1554"></a><span class='hs-comment'>-- See 'windowMove' and 'Gravity' for more details.</span>
<a name="line-1555"></a><span class='hs-comment'>--</span>
<a name="line-1556"></a><span class='hs-comment'>-- The default window gravity is 'GravityNorthWest' which will typically</span>
<a name="line-1557"></a><span class='hs-comment'>-- \"do what you mean.\"</span>
<a name="line-1558"></a><span class='hs-comment'>--</span>
<a name="line-1559"></a><span class='hs-definition'>windowSetGravity</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1560"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Gravity</span> <span class='hs-comment'>-- ^ @gravity@ - window gravity</span>
<a name="line-1561"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1562"></a><span class='hs-definition'>windowSetGravity</span> <span class='hs-varid'>self</span> <span class='hs-varid'>gravity</span> <span class='hs-keyglyph'>=</span>
<a name="line-1563"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_gravity</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1564"></a><span class='hs-comment'>{-# LINE 1483 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1565"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1566"></a> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromEnum</span><span class='hs-layout'>)</span> <span class='hs-varid'>gravity</span><span class='hs-layout'>)</span>
<a name="line-1567"></a>
<a name="line-1568"></a><a name="windowGetGravity"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetGravity'.</span>
<a name="line-1569"></a><span class='hs-comment'>--</span>
<a name="line-1570"></a><span class='hs-definition'>windowGetGravity</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1571"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Gravity</span> <span class='hs-comment'>-- ^ returns window gravity</span>
<a name="line-1572"></a><span class='hs-definition'>windowGetGravity</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1573"></a> <span class='hs-varid'>liftM</span> <span class='hs-layout'>(</span><span class='hs-varid'>toEnum</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromIntegral</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-1574"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_gravity</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1575"></a><span class='hs-comment'>{-# LINE 1493 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1576"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1577"></a>
<a name="line-1578"></a><a name="windowMove"></a><span class='hs-comment'>-- | Asks the window manager to move @window@ to the given position. Window</span>
<a name="line-1579"></a><span class='hs-comment'>-- managers are free to ignore this; most window managers ignore requests for</span>
<a name="line-1580"></a><span class='hs-comment'>-- initial window positions (instead using a user-defined placement algorithm)</span>
<a name="line-1581"></a><span class='hs-comment'>-- and honor requests after the window has already been shown.</span>
<a name="line-1582"></a><span class='hs-comment'>--</span>
<a name="line-1583"></a><span class='hs-comment'>-- Note: the position is the position of the gravity-determined reference</span>
<a name="line-1584"></a><span class='hs-comment'>-- point for the window. The gravity determines two things: first, the location</span>
<a name="line-1585"></a><span class='hs-comment'>-- of the reference point in root window coordinates; and second, which point</span>
<a name="line-1586"></a><span class='hs-comment'>-- on the window is positioned at the reference point.</span>
<a name="line-1587"></a><span class='hs-comment'>--</span>
<a name="line-1588"></a><span class='hs-comment'>-- By default the gravity is 'GravityNorthWest', so the reference point is</span>
<a name="line-1589"></a><span class='hs-comment'>-- simply the @x@, @y@ supplied to 'windowMove'. The top-left corner of the</span>
<a name="line-1590"></a><span class='hs-comment'>-- window decorations (aka window frame or border) will be placed at @x@, @y@.</span>
<a name="line-1591"></a><span class='hs-comment'>-- Therefore, to position a window at the top left of the screen, you want to</span>
<a name="line-1592"></a><span class='hs-comment'>-- use the default gravity (which is 'GravityNorthWest') and move the window to</span>
<a name="line-1593"></a><span class='hs-comment'>-- 0,0.</span>
<a name="line-1594"></a><span class='hs-comment'>--</span>
<a name="line-1595"></a><span class='hs-comment'>-- To position a window at the bottom right corner of the screen, you would</span>
<a name="line-1596"></a><span class='hs-comment'>-- set 'GravitySouthEast', which means that the reference point is at @x@ + the</span>
<a name="line-1597"></a><span class='hs-comment'>-- window width and @y@ + the window height, and the bottom-right corner of the</span>
<a name="line-1598"></a><span class='hs-comment'>-- window border will be placed at that reference point. So, to place a window</span>
<a name="line-1599"></a><span class='hs-comment'>-- in the bottom right corner you would first set gravity to south east, then</span>
<a name="line-1600"></a><span class='hs-comment'>-- write: @gtk_window_move (window, gdk_screen_width() - window_width,</span>
<a name="line-1601"></a><span class='hs-comment'>-- gdk_screen_height() - window_height)@.</span>
<a name="line-1602"></a><span class='hs-comment'>--</span>
<a name="line-1603"></a><span class='hs-comment'>-- The Extended Window Manager Hints specification at</span>
<a name="line-1604"></a><span class='hs-comment'>-- http:\/\/www.freedesktop.org\/Standards\/wm-spec has a nice table of</span>
<a name="line-1605"></a><span class='hs-comment'>-- gravities in the \"implementation notes\" section.</span>
<a name="line-1606"></a><span class='hs-comment'>--</span>
<a name="line-1607"></a><span class='hs-comment'>-- The 'windowGetPosition' documentation may also be relevant.</span>
<a name="line-1608"></a><span class='hs-comment'>--</span>
<a name="line-1609"></a><span class='hs-definition'>windowMove</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1610"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @x@ - X coordinate to move window to</span>
<a name="line-1611"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @y@ - Y coordinate to move window to</span>
<a name="line-1612"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1613"></a><span class='hs-definition'>windowMove</span> <span class='hs-varid'>self</span> <span class='hs-varid'>x</span> <span class='hs-varid'>y</span> <span class='hs-keyglyph'>=</span>
<a name="line-1614"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_move</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span>
<a name="line-1615"></a><span class='hs-comment'>{-# LINE 1532 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1616"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1617"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>x</span><span class='hs-layout'>)</span>
<a name="line-1618"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>y</span><span class='hs-layout'>)</span>
<a name="line-1619"></a>
<a name="line-1620"></a><a name="windowParseGeometry"></a><span class='hs-comment'>-- | Parses a standard X Window System geometry string - see the manual page for X (type 'man X') for details on this.</span>
<a name="line-1621"></a><span class='hs-comment'>-- 'windowParseGeometry' does work on all GTK+ ports including Win32 but is primarily intended for an X environment.</span>
<a name="line-1622"></a><span class='hs-comment'>--</span>
<a name="line-1623"></a><span class='hs-comment'>-- If either a size or a position can be extracted from the geometry string,</span>
<a name="line-1624"></a><span class='hs-comment'>-- 'windowParseGeometry' returns @True@ and calls gtk_window_set_default_size() and/or gtk_window_move() to resize/move the window.</span>
<a name="line-1625"></a><span class='hs-comment'>--</span>
<a name="line-1626"></a><span class='hs-comment'>-- If 'windowParseGeometry' returns @True@,</span>
<a name="line-1627"></a><span class='hs-comment'>-- it will also set the 'HintUserPos' and/or 'HintUserSize' hints indicating to the window manager that the size/position of the window was user-specified</span>
<a name="line-1628"></a><span class='hs-comment'>-- This causes most window managers to honor the geometry.</span>
<a name="line-1629"></a><span class='hs-comment'>--</span>
<a name="line-1630"></a><span class='hs-comment'>-- Note that for 'windowParseGeometry' to work as expected, it has to be called when the window has its "final" size, i.e.</span>
<a name="line-1631"></a><span class='hs-comment'>-- after calling 'widgetShowAll' on the contents and 'windowSetGeometryHints' on the window.</span>
<a name="line-1632"></a><span class='hs-comment'>--</span>
<a name="line-1633"></a><span class='hs-definition'>windowParseGeometry</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1634"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>String</span>
<a name="line-1635"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span>
<a name="line-1636"></a><span class='hs-definition'>windowParseGeometry</span> <span class='hs-varid'>self</span> <span class='hs-varid'>geometry</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-1637"></a> <span class='hs-varid'>withUTFString</span> <span class='hs-varid'>geometry</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>geometryPtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1638"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_parse_geometry</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1639"></a><span class='hs-comment'>{-# LINE 1555 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1640"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1641"></a> <span class='hs-varid'>geometryPtr</span>
<a name="line-1642"></a>
<a name="line-1643"></a><a name="windowReshowWithInitialSize"></a><span class='hs-comment'>-- | Hides window, then reshows it, resetting the default size and position of the window. Used by GUI builders only.</span>
<a name="line-1644"></a><span class='hs-comment'>--</span>
<a name="line-1645"></a><span class='hs-definition'>windowReshowWithInitialSize</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1646"></a><span class='hs-definition'>windowReshowWithInitialSize</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1647"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_reshow_with_initial_size</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1648"></a>
<a name="line-1649"></a><a name="windowResize"></a><span class='hs-comment'>-- | Resizes the window as if the user had done so, obeying geometry</span>
<a name="line-1650"></a><span class='hs-comment'>-- constraints. The default geometry constraint is that windows may not be</span>
<a name="line-1651"></a><span class='hs-comment'>-- smaller than their size request; to override this constraint, call</span>
<a name="line-1652"></a><span class='hs-comment'>-- 'widgetSetSizeRequest' to set the window's request to a smaller value.</span>
<a name="line-1653"></a><span class='hs-comment'>--</span>
<a name="line-1654"></a><span class='hs-comment'>-- If 'windowResize' is called before showing a window for the first time,</span>
<a name="line-1655"></a><span class='hs-comment'>-- it overrides any default size set with 'windowSetDefaultSize'.</span>
<a name="line-1656"></a><span class='hs-comment'>--</span>
<a name="line-1657"></a><span class='hs-comment'>-- Windows may not be resized smaller than 1 by 1 pixels.</span>
<a name="line-1658"></a><span class='hs-comment'>--</span>
<a name="line-1659"></a><span class='hs-definition'>windowResize</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1660"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @width@ - width in pixels to resize the window to</span>
<a name="line-1661"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @height@ - height in pixels to resize the window to</span>
<a name="line-1662"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1663"></a><span class='hs-definition'>windowResize</span> <span class='hs-varid'>self</span> <span class='hs-varid'>width</span> <span class='hs-varid'>height</span> <span class='hs-keyglyph'>=</span>
<a name="line-1664"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_resize</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span>
<a name="line-1665"></a><span class='hs-comment'>{-# LINE 1580 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1666"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1667"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>width</span><span class='hs-layout'>)</span>
<a name="line-1668"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span>
<a name="line-1669"></a>
<a name="line-1670"></a><a name="windowBeginResizeDrag"></a><span class='hs-comment'>-- | Starts resizing a window. This function is used if an application has</span>
<a name="line-1671"></a><span class='hs-comment'>-- window resizing controls. When GDK can support it, the resize will be done</span>
<a name="line-1672"></a><span class='hs-comment'>-- using the standard mechanism for the window manager or windowing system.</span>
<a name="line-1673"></a><span class='hs-comment'>-- Otherwise, GDK will try to emulate window resizing, potentially not all that</span>
<a name="line-1674"></a><span class='hs-comment'>-- well, depending on the windowing system.</span>
<a name="line-1675"></a><span class='hs-comment'>--</span>
<a name="line-1676"></a><span class='hs-definition'>windowBeginResizeDrag</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1677"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>WindowEdge</span> <span class='hs-comment'>-- ^ @edge@ - position of the resize control</span>
<a name="line-1678"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>MouseButton</span> <span class='hs-comment'>-- ^ @button@ - mouse button that initiated the drag</span>
<a name="line-1679"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @rootX@ - X position where the user clicked to initiate</span>
<a name="line-1680"></a> <span class='hs-comment'>-- the drag, in root window coordinates</span>
<a name="line-1681"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @rootY@ - Y position where the user clicked to initiate</span>
<a name="line-1682"></a> <span class='hs-comment'>-- the drag</span>
<a name="line-1683"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>TimeStamp</span> <span class='hs-comment'>-- ^ @timestamp@ - timestamp from the click event that</span>
<a name="line-1684"></a> <span class='hs-comment'>-- initiated the drag</span>
<a name="line-1685"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1686"></a><span class='hs-definition'>windowBeginResizeDrag</span> <span class='hs-varid'>self</span> <span class='hs-varid'>edge</span> <span class='hs-varid'>button</span> <span class='hs-varid'>rootX</span> <span class='hs-varid'>rootY</span> <span class='hs-varid'>timestamp</span> <span class='hs-keyglyph'>=</span>
<a name="line-1687"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-varid'>arg5</span> <span class='hs-varid'>arg6</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_begin_resize_drag</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-varid'>arg5</span> <span class='hs-varid'>arg6</span><span class='hs-layout'>)</span>
<a name="line-1688"></a><span class='hs-comment'>{-# LINE 1602 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1689"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1690"></a> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromEnum</span><span class='hs-layout'>)</span> <span class='hs-varid'>edge</span><span class='hs-layout'>)</span>
<a name="line-1691"></a> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromEnum</span><span class='hs-layout'>)</span> <span class='hs-varid'>button</span><span class='hs-layout'>)</span>
<a name="line-1692"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>rootX</span><span class='hs-layout'>)</span>
<a name="line-1693"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>rootY</span><span class='hs-layout'>)</span>
<a name="line-1694"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>timestamp</span><span class='hs-layout'>)</span>
<a name="line-1695"></a>
<a name="line-1696"></a><a name="windowBeginMoveDrag"></a><span class='hs-comment'>-- | Starts moving a window. This function is used if an application has</span>
<a name="line-1697"></a><span class='hs-comment'>-- window movement grips. When GDK can support it, the window movement will be</span>
<a name="line-1698"></a><span class='hs-comment'>-- done using the standard mechanism for the window manager or windowing</span>
<a name="line-1699"></a><span class='hs-comment'>-- system. Otherwise, GDK will try to emulate window movement, potentially not</span>
<a name="line-1700"></a><span class='hs-comment'>-- all that well, depending on the windowing system.</span>
<a name="line-1701"></a><span class='hs-comment'>--</span>
<a name="line-1702"></a><span class='hs-definition'>windowBeginMoveDrag</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1703"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>MouseButton</span> <span class='hs-comment'>-- ^ @button@ - mouse button that initiated the drag</span>
<a name="line-1704"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @rootX@ - X position where the user clicked to initiate the</span>
<a name="line-1705"></a> <span class='hs-comment'>-- drag, in root window coordinates</span>
<a name="line-1706"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Int</span> <span class='hs-comment'>-- ^ @rootY@ - Y position where the user clicked to initiate the</span>
<a name="line-1707"></a> <span class='hs-comment'>-- drag</span>
<a name="line-1708"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>TimeStamp</span> <span class='hs-comment'>-- ^ @timestamp@ - timestamp from the click event that initiated</span>
<a name="line-1709"></a> <span class='hs-comment'>-- the drag</span>
<a name="line-1710"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1711"></a><span class='hs-definition'>windowBeginMoveDrag</span> <span class='hs-varid'>self</span> <span class='hs-varid'>button</span> <span class='hs-varid'>rootX</span> <span class='hs-varid'>rootY</span> <span class='hs-varid'>timestamp</span> <span class='hs-keyglyph'>=</span>
<a name="line-1712"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-varid'>arg5</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_begin_move_drag</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-varid'>arg5</span><span class='hs-layout'>)</span>
<a name="line-1713"></a><span class='hs-comment'>{-# LINE 1626 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1714"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1715"></a> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromEnum</span><span class='hs-layout'>)</span> <span class='hs-varid'>button</span><span class='hs-layout'>)</span>
<a name="line-1716"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>rootX</span><span class='hs-layout'>)</span>
<a name="line-1717"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>rootY</span><span class='hs-layout'>)</span>
<a name="line-1718"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>timestamp</span><span class='hs-layout'>)</span>
<a name="line-1719"></a>
<a name="line-1720"></a><a name="windowGetPosition"></a><span class='hs-comment'>-- | This function returns the position you need to pass to 'windowMove' to</span>
<a name="line-1721"></a><span class='hs-comment'>-- keep @window@ in its current position. This means that the meaning of the</span>
<a name="line-1722"></a><span class='hs-comment'>-- returned value varies with window gravity. See 'windowMove' for more</span>
<a name="line-1723"></a><span class='hs-comment'>-- details.</span>
<a name="line-1724"></a><span class='hs-comment'>--</span>
<a name="line-1725"></a><span class='hs-comment'>-- If you haven't changed the window gravity, its gravity will be</span>
<a name="line-1726"></a><span class='hs-comment'>-- 'GravityNorthWest'. This means that 'windowGetPosition' gets the position of</span>
<a name="line-1727"></a><span class='hs-comment'>-- the top-left corner of the window manager frame for the window. 'windowMove'</span>
<a name="line-1728"></a><span class='hs-comment'>-- sets the position of this same top-left corner.</span>
<a name="line-1729"></a><span class='hs-comment'>--</span>
<a name="line-1730"></a><span class='hs-comment'>-- Moreover, nearly all window managers are historically broken with respect</span>
<a name="line-1731"></a><span class='hs-comment'>-- to their handling of window gravity. So moving a window to its current</span>
<a name="line-1732"></a><span class='hs-comment'>-- position as returned by 'windowGetPosition' tends to result in moving the</span>
<a name="line-1733"></a><span class='hs-comment'>-- window slightly. Window managers are slowly getting better over time.</span>
<a name="line-1734"></a><span class='hs-comment'>--</span>
<a name="line-1735"></a><span class='hs-comment'>-- If a window has gravity 'GravityStatic' the window manager frame is not</span>
<a name="line-1736"></a><span class='hs-comment'>-- relevant, and thus 'windowGetPosition' will always produce accurate results.</span>
<a name="line-1737"></a><span class='hs-comment'>-- However you can't use static gravity to do things like place a window in a</span>
<a name="line-1738"></a><span class='hs-comment'>-- corner of the screen, because static gravity ignores the window manager</span>
<a name="line-1739"></a><span class='hs-comment'>-- decorations.</span>
<a name="line-1740"></a><span class='hs-comment'>--</span>
<a name="line-1741"></a><span class='hs-comment'>-- If you are saving and restoring your application's window positions, you</span>
<a name="line-1742"></a><span class='hs-comment'>-- should know that it's impossible for applications to do this without getting</span>
<a name="line-1743"></a><span class='hs-comment'>-- it somewhat wrong because applications do not have sufficient knowledge of</span>
<a name="line-1744"></a><span class='hs-comment'>-- window manager state. The Correct Mechanism is to support the session</span>
<a name="line-1745"></a><span class='hs-comment'>-- management protocol (see the \"GnomeClient\" object in the GNOME libraries</span>
<a name="line-1746"></a><span class='hs-comment'>-- for example) and allow the window manager to save your window sizes and</span>
<a name="line-1747"></a><span class='hs-comment'>-- positions.</span>
<a name="line-1748"></a><span class='hs-comment'>--</span>
<a name="line-1749"></a><span class='hs-definition'>windowGetPosition</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1750"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ @(rootX, rootY)@ - X and Y coordinate of</span>
<a name="line-1751"></a> <span class='hs-comment'>-- gravity-determined reference point</span>
<a name="line-1752"></a><span class='hs-definition'>windowGetPosition</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1753"></a> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>rootXPtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1754"></a> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>rootYPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1755"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_position</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span>
<a name="line-1756"></a><span class='hs-comment'>{-# LINE 1668 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1757"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1758"></a> <span class='hs-varid'>rootXPtr</span>
<a name="line-1759"></a> <span class='hs-varid'>rootYPtr</span>
<a name="line-1760"></a> <span class='hs-varid'>rootX</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>rootXPtr</span>
<a name="line-1761"></a> <span class='hs-varid'>rootY</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>rootYPtr</span>
<a name="line-1762"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>rootX</span><span class='hs-layout'>,</span> <span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>rootY</span><span class='hs-layout'>)</span>
<a name="line-1763"></a>
<a name="line-1764"></a><a name="windowGetSize"></a><span class='hs-comment'>-- | Obtains the current size of the window. If the window is not onscreen, it</span>
<a name="line-1765"></a><span class='hs-comment'>-- returns the size Gtk+ will suggest to the window manager for the initial</span>
<a name="line-1766"></a><span class='hs-comment'>-- window size (but this is not reliably the same as the size the window</span>
<a name="line-1767"></a><span class='hs-comment'>-- manager will actually select). The size obtained by 'windowGetSize' is the</span>
<a name="line-1768"></a><span class='hs-comment'>-- last size received in a 'EventConfigure', that is,</span>
<a name="line-1769"></a><span class='hs-comment'>-- Gtk+ uses its locally-stored size, rather than querying the X server for the</span>
<a name="line-1770"></a><span class='hs-comment'>-- size. As a result, if you call 'windowResize' then immediately call</span>
<a name="line-1771"></a><span class='hs-comment'>-- 'windowGetSize', the size won't have taken effect yet. After the window</span>
<a name="line-1772"></a><span class='hs-comment'>-- manager processes the resize request, Gtk+ receives notification that the</span>
<a name="line-1773"></a><span class='hs-comment'>-- size has changed via a configure event, and the size of the window gets</span>
<a name="line-1774"></a><span class='hs-comment'>-- updated.</span>
<a name="line-1775"></a><span class='hs-comment'>--</span>
<a name="line-1776"></a><span class='hs-comment'>-- Note 1: Nearly any use of this function creates a race condition, because</span>
<a name="line-1777"></a><span class='hs-comment'>-- the size of the window may change between the time that you get the size and</span>
<a name="line-1778"></a><span class='hs-comment'>-- the time that you perform some action assuming that size is the current</span>
<a name="line-1779"></a><span class='hs-comment'>-- size. To avoid race conditions, connect to \"configure_event\" on the window</span>
<a name="line-1780"></a><span class='hs-comment'>-- and adjust your size-dependent state to match the size delivered in the</span>
<a name="line-1781"></a><span class='hs-comment'>-- 'EventConfigure'.</span>
<a name="line-1782"></a><span class='hs-comment'>--</span>
<a name="line-1783"></a><span class='hs-comment'>-- Note 2: The returned size does /not/ include the size of the window</span>
<a name="line-1784"></a><span class='hs-comment'>-- manager decorations (aka the window frame or border). Those are not drawn by</span>
<a name="line-1785"></a><span class='hs-comment'>-- Gtk+ and Gtk+ has no reliable method of determining their size.</span>
<a name="line-1786"></a><span class='hs-comment'>--</span>
<a name="line-1787"></a><span class='hs-comment'>-- Note 3: If you are getting a window size in order to position the window</span>
<a name="line-1788"></a><span class='hs-comment'>-- onscreen, there may be a better way. The preferred way is to simply set the</span>
<a name="line-1789"></a><span class='hs-comment'>-- window's semantic type with 'windowSetTypeHint', which allows the window</span>
<a name="line-1790"></a><span class='hs-comment'>-- manager to e.g. center dialogs. Also, if you set the transient parent of</span>
<a name="line-1791"></a><span class='hs-comment'>-- dialogs with 'windowSetTransientFor' window managers will often center the</span>
<a name="line-1792"></a><span class='hs-comment'>-- dialog over its parent window. It's much preferred to let the window manager</span>
<a name="line-1793"></a><span class='hs-comment'>-- handle these things rather than doing it yourself, because all apps will</span>
<a name="line-1794"></a><span class='hs-comment'>-- behave consistently and according to user prefs if the window manager</span>
<a name="line-1795"></a><span class='hs-comment'>-- handles it. Also, the window manager can take the size of the window</span>
<a name="line-1796"></a><span class='hs-comment'>-- decorations\/border into account, while your application cannot.</span>
<a name="line-1797"></a><span class='hs-comment'>--</span>
<a name="line-1798"></a><span class='hs-comment'>-- In any case, if you insist on application-specified window positioning,</span>
<a name="line-1799"></a><span class='hs-comment'>-- there's /still/ a better way than doing it yourself - 'windowSetPosition'</span>
<a name="line-1800"></a><span class='hs-comment'>-- will frequently handle the details for you.</span>
<a name="line-1801"></a><span class='hs-comment'>--</span>
<a name="line-1802"></a><span class='hs-definition'>windowGetSize</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1803"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ @(width, height)@</span>
<a name="line-1804"></a><span class='hs-definition'>windowGetSize</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1805"></a> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>widthPtr</span> <span class='hs-keyglyph'>-></span>
<a name="line-1806"></a> <span class='hs-varid'>alloca</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>heightPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1807"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_size</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span> <span class='hs-varid'>arg3</span><span class='hs-layout'>)</span>
<a name="line-1808"></a><span class='hs-comment'>{-# LINE 1719 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1809"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1810"></a> <span class='hs-varid'>widthPtr</span>
<a name="line-1811"></a> <span class='hs-varid'>heightPtr</span>
<a name="line-1812"></a> <span class='hs-varid'>width</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>widthPtr</span>
<a name="line-1813"></a> <span class='hs-varid'>height</span> <span class='hs-keyglyph'><-</span> <span class='hs-varid'>peek</span> <span class='hs-varid'>heightPtr</span>
<a name="line-1814"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>width</span><span class='hs-layout'>,</span> <span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span>
<a name="line-1815"></a>
<a name="line-1816"></a><a name="windowSetTypeHint"></a><span class='hs-comment'>-- | By setting the type hint for the window, you allow the window manager to</span>
<a name="line-1817"></a><span class='hs-comment'>-- decorate and handle the window in a way which is suitable to the function of</span>
<a name="line-1818"></a><span class='hs-comment'>-- the window in your application.</span>
<a name="line-1819"></a><span class='hs-comment'>--</span>
<a name="line-1820"></a><span class='hs-comment'>-- This function should be called before the window becomes visible.</span>
<a name="line-1821"></a><span class='hs-comment'>--</span>
<a name="line-1822"></a><span class='hs-definition'>windowSetTypeHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1823"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>WindowTypeHint</span> <span class='hs-comment'>-- ^ @hint@ - the window type</span>
<a name="line-1824"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1825"></a><span class='hs-definition'>windowSetTypeHint</span> <span class='hs-varid'>self</span> <span class='hs-varid'>hint</span> <span class='hs-keyglyph'>=</span>
<a name="line-1826"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_type_hint</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1827"></a><span class='hs-comment'>{-# LINE 1737 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1828"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1829"></a> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromEnum</span><span class='hs-layout'>)</span> <span class='hs-varid'>hint</span><span class='hs-layout'>)</span>
<a name="line-1830"></a>
<a name="line-1831"></a><a name="windowGetTypeHint"></a><span class='hs-comment'>-- | Gets the type hint for this window. See 'windowSetTypeHint'.</span>
<a name="line-1832"></a><span class='hs-comment'>--</span>
<a name="line-1833"></a><span class='hs-definition'>windowGetTypeHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1834"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>WindowTypeHint</span> <span class='hs-comment'>-- ^ returns the type hint for @window@.</span>
<a name="line-1835"></a><span class='hs-definition'>windowGetTypeHint</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1836"></a> <span class='hs-varid'>liftM</span> <span class='hs-layout'>(</span><span class='hs-varid'>toEnum</span> <span class='hs-varop'>.</span> <span class='hs-varid'>fromIntegral</span><span class='hs-layout'>)</span> <span class='hs-varop'>$</span>
<a name="line-1837"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_type_hint</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1838"></a><span class='hs-comment'>{-# LINE 1747 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1839"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1840"></a>
<a name="line-1841"></a>
<a name="line-1842"></a><a name="windowPresentWithTime"></a><span class='hs-comment'>-- | Presents a window to the user in response to a user interaction. If you</span>
<a name="line-1843"></a><span class='hs-comment'>-- need to present a window without a timestamp, use 'windowPresent'. See</span>
<a name="line-1844"></a><span class='hs-comment'>-- 'windowPresent' for details.</span>
<a name="line-1845"></a><span class='hs-comment'>--</span>
<a name="line-1846"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.8</span>
<a name="line-1847"></a><span class='hs-comment'>--</span>
<a name="line-1848"></a><span class='hs-definition'>windowPresentWithTime</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1849"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>TimeStamp</span> <span class='hs-comment'>-- ^ @timestamp@ - the timestamp of the user interaction</span>
<a name="line-1850"></a> <span class='hs-comment'>-- (typically a button or key press event) which triggered this</span>
<a name="line-1851"></a> <span class='hs-comment'>-- call</span>
<a name="line-1852"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1853"></a><span class='hs-definition'>windowPresentWithTime</span> <span class='hs-varid'>self</span> <span class='hs-varid'>timestamp</span> <span class='hs-keyglyph'>=</span>
<a name="line-1854"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_present_with_time</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1855"></a><span class='hs-comment'>{-# LINE 1763 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1856"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1857"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>timestamp</span><span class='hs-layout'>)</span>
<a name="line-1858"></a>
<a name="line-1859"></a><a name="windowSetUrgencyHint"></a><span class='hs-comment'>-- | Windows may set a hint asking the desktop environment to draw the users</span>
<a name="line-1860"></a><span class='hs-comment'>-- attention to the window. This function sets this hint.</span>
<a name="line-1861"></a><span class='hs-comment'>--</span>
<a name="line-1862"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.8</span>
<a name="line-1863"></a><span class='hs-comment'>--</span>
<a name="line-1864"></a><span class='hs-definition'>windowSetUrgencyHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1865"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ @setting@ - @True@ to mark this window as urgent</span>
<a name="line-1866"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1867"></a><span class='hs-definition'>windowSetUrgencyHint</span> <span class='hs-varid'>self</span> <span class='hs-varid'>setting</span> <span class='hs-keyglyph'>=</span>
<a name="line-1868"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_urgency_hint</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span>
<a name="line-1869"></a><span class='hs-comment'>{-# LINE 1776 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1870"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1871"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromBool</span> <span class='hs-varid'>setting</span><span class='hs-layout'>)</span>
<a name="line-1872"></a>
<a name="line-1873"></a><a name="windowGetUrgencyHint"></a><span class='hs-comment'>-- | Gets the value set by 'windowSetUrgencyHint'</span>
<a name="line-1874"></a><span class='hs-comment'>--</span>
<a name="line-1875"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.8</span>
<a name="line-1876"></a><span class='hs-comment'>--</span>
<a name="line-1877"></a><span class='hs-definition'>windowGetUrgencyHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-1878"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Bool</span> <span class='hs-comment'>-- ^ returns @True@ if window is urgent</span>
<a name="line-1879"></a><span class='hs-definition'>windowGetUrgencyHint</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-1880"></a> <span class='hs-varid'>liftM</span> <span class='hs-varid'>toBool</span> <span class='hs-varop'>$</span>
<a name="line-1881"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_urgency_hint</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span>
<a name="line-1882"></a><span class='hs-comment'>{-# LINE 1788 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1883"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1884"></a>
<a name="line-1885"></a>
<a name="line-1886"></a><a name="windowSetGeometryHints"></a><span class='hs-comment'>-- | This function sets up hints about how a window can be resized by the</span>
<a name="line-1887"></a><span class='hs-comment'>-- user. You can set a minimum and maximum size, the allowed resize increments</span>
<a name="line-1888"></a><span class='hs-comment'>-- (e.g. for xterm, you can only resize by the size of a character) and aspect</span>
<a name="line-1889"></a><span class='hs-comment'>-- ratios.</span>
<a name="line-1890"></a><span class='hs-comment'>--</span>
<a name="line-1891"></a><span class='hs-comment'>-- If you set a geometry widget, the hints will apply to the geometry widget</span>
<a name="line-1892"></a><span class='hs-comment'>-- instead of directly to the toplevel window. Of course since the geometry</span>
<a name="line-1893"></a><span class='hs-comment'>-- widget is a child widget of the top level window, constraining the sizing</span>
<a name="line-1894"></a><span class='hs-comment'>-- behaviour of the widget will have a knock-on effect on the sizing of the</span>
<a name="line-1895"></a><span class='hs-comment'>-- toplevel window.</span>
<a name="line-1896"></a><span class='hs-comment'>--</span>
<a name="line-1897"></a><span class='hs-comment'>-- The @minWidth@\/@minHeight@\/@maxWidth@\/@maxHeight@ fields may be set to</span>
<a name="line-1898"></a><span class='hs-comment'>-- @-1@, to use the size request of the window or geometry widget. If the</span>
<a name="line-1899"></a><span class='hs-comment'>-- minimum size hint is not provided, Gtk+ will use the size requisition of the</span>
<a name="line-1900"></a><span class='hs-comment'>-- window (or the geometry widget if it set) as the minimum size. The base size</span>
<a name="line-1901"></a><span class='hs-comment'>-- is treated similarly.</span>
<a name="line-1902"></a><span class='hs-comment'>--</span>
<a name="line-1903"></a><span class='hs-comment'>-- The canonical use-case for 'windowSetGeometryHints' is to get a terminal</span>
<a name="line-1904"></a><span class='hs-comment'>-- widget to resize properly. Here, the terminal text area should be the</span>
<a name="line-1905"></a><span class='hs-comment'>-- geometry widget. Gtk+ will then automatically set the base size of the</span>
<a name="line-1906"></a><span class='hs-comment'>-- terminal window to the size of other widgets in the terminal window, such as</span>
<a name="line-1907"></a><span class='hs-comment'>-- the menubar and scrollbar. Then, the @widthInc@ and @heightInc@ values</span>
<a name="line-1908"></a><span class='hs-comment'>-- should be set to the size of one character in the terminal. Finally, the</span>
<a name="line-1909"></a><span class='hs-comment'>-- base size should be set to the size of one character. The net effect is that</span>
<a name="line-1910"></a><span class='hs-comment'>-- the minimum size of the terminal will have a 1x1 character terminal area,</span>
<a name="line-1911"></a><span class='hs-comment'>-- and only terminal sizes on the \"character grid\" will be allowed.</span>
<a name="line-1912"></a><span class='hs-comment'>--</span>
<a name="line-1913"></a><span class='hs-comment'>-- The other useful settings are @minAspect@ and @maxAspect@. These specify a</span>
<a name="line-1914"></a><span class='hs-comment'>-- width\/height ratio as a floating point number. If a geometry widget is set,</span>
<a name="line-1915"></a><span class='hs-comment'>-- the aspect applies to the geometry widget rather than the entire window. The</span>
<a name="line-1916"></a><span class='hs-comment'>-- most common use of these hints is probably to set @minAspect@ and</span>
<a name="line-1917"></a><span class='hs-comment'>-- @maxAspect@ to the same value, thus forcing the window to keep a constant</span>
<a name="line-1918"></a><span class='hs-comment'>-- aspect ratio.</span>
<a name="line-1919"></a><span class='hs-comment'>--</span>
<a name="line-1920"></a><span class='hs-definition'>windowSetGeometryHints</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span><span class='hs-layout'>,</span> <span class='hs-conid'>WidgetClass</span> <span class='hs-varid'>widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=></span>
<a name="line-1921"></a> <span class='hs-varid'>self</span> <span class='hs-comment'>-- ^ @window@ - the top level window</span>
<a name="line-1922"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-varid'>widget</span> <span class='hs-comment'>-- ^ @geometryWidget@ - optionall a widget the geometry</span>
<a name="line-1923"></a> <span class='hs-comment'>-- hints will be applied to rather than directly to the</span>
<a name="line-1924"></a> <span class='hs-comment'>-- top level window</span>
<a name="line-1925"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ @(minWidth, minHeight)@ - minimum width and height</span>
<a name="line-1926"></a> <span class='hs-comment'>-- of window (or -1 to use requisition)</span>
<a name="line-1927"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ @(maxWidth, maxHeight)@ - maximum width and height</span>
<a name="line-1928"></a> <span class='hs-comment'>-- of window (or -1 to use requisition)</span>
<a name="line-1929"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ @(baseWidth, baseHeight)@ - the allowed window widths</span>
<a name="line-1930"></a> <span class='hs-comment'>-- are @base_width + width_inc * N@ for any int @N@.</span>
<a name="line-1931"></a> <span class='hs-comment'>-- Similarly, the allowed window widths are @base_height +</span>
<a name="line-1932"></a> <span class='hs-comment'>-- height_inc * N@ for any int @N@. For either the base</span>
<a name="line-1933"></a> <span class='hs-comment'>-- width or height -1 is allowed as described above.</span>
<a name="line-1934"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Int</span><span class='hs-layout'>,</span> <span class='hs-conid'>Int</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ @(widthInc, heightInc)@ - width and height resize</span>
<a name="line-1935"></a> <span class='hs-comment'>-- increment</span>
<a name="line-1936"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Double</span><span class='hs-layout'>,</span> <span class='hs-conid'>Double</span><span class='hs-layout'>)</span> <span class='hs-comment'>-- ^ @(minAspect, maxAspect)@ - minimum and maximum</span>
<a name="line-1937"></a> <span class='hs-comment'>-- width\/height ratio</span>
<a name="line-1938"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-1939"></a><span class='hs-definition'>windowSetGeometryHints</span> <span class='hs-varid'>self</span> <span class='hs-varid'>geometryWidget</span>
<a name="line-1940"></a> <span class='hs-varid'>minSize</span> <span class='hs-varid'>maxSize</span> <span class='hs-varid'>baseSize</span> <span class='hs-varid'>incSize</span> <span class='hs-varid'>aspect</span> <span class='hs-keyglyph'>=</span>
<a name="line-1941"></a> <span class='hs-varid'>allocaBytes</span> <span class='hs-num'>52</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>geometryPtr</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1942"></a> <span class='hs-varid'>minSizeFlag</span> <span class='hs-keyglyph'><-</span> <span class='hs-keyword'>case</span> <span class='hs-varid'>minSize</span> <span class='hs-keyword'>of</span>
<a name="line-1943"></a> <span class='hs-conid'>Nothing</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>return</span> <span class='hs-num'>0</span>
<a name="line-1944"></a> <span class='hs-conid'>Just</span> <span class='hs-layout'>(</span><span class='hs-varid'>width</span><span class='hs-layout'>,</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1945"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>0</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>width</span><span class='hs-layout'>)</span>
<a name="line-1946"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>4</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span>
<a name="line-1947"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintMinSize</span><span class='hs-layout'>)</span>
<a name="line-1948"></a> <span class='hs-varid'>maxSizeFlag</span> <span class='hs-keyglyph'><-</span> <span class='hs-keyword'>case</span> <span class='hs-varid'>maxSize</span> <span class='hs-keyword'>of</span>
<a name="line-1949"></a> <span class='hs-conid'>Nothing</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>return</span> <span class='hs-num'>0</span>
<a name="line-1950"></a> <span class='hs-conid'>Just</span> <span class='hs-layout'>(</span><span class='hs-varid'>width</span><span class='hs-layout'>,</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1951"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>8</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>width</span><span class='hs-layout'>)</span>
<a name="line-1952"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>12</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span>
<a name="line-1953"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintMaxSize</span><span class='hs-layout'>)</span>
<a name="line-1954"></a> <span class='hs-varid'>baseSizeFlag</span> <span class='hs-keyglyph'><-</span> <span class='hs-keyword'>case</span> <span class='hs-varid'>baseSize</span> <span class='hs-keyword'>of</span>
<a name="line-1955"></a> <span class='hs-conid'>Nothing</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>return</span> <span class='hs-num'>0</span>
<a name="line-1956"></a> <span class='hs-conid'>Just</span> <span class='hs-layout'>(</span><span class='hs-varid'>width</span><span class='hs-layout'>,</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1957"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>16</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>width</span><span class='hs-layout'>)</span>
<a name="line-1958"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>20</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span>
<a name="line-1959"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintBaseSize</span><span class='hs-layout'>)</span>
<a name="line-1960"></a> <span class='hs-varid'>incSizeFlag</span> <span class='hs-keyglyph'><-</span> <span class='hs-keyword'>case</span> <span class='hs-varid'>incSize</span> <span class='hs-keyword'>of</span>
<a name="line-1961"></a> <span class='hs-conid'>Nothing</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>return</span> <span class='hs-num'>0</span>
<a name="line-1962"></a> <span class='hs-conid'>Just</span> <span class='hs-layout'>(</span><span class='hs-varid'>width</span><span class='hs-layout'>,</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1963"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>24</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>width</span><span class='hs-layout'>)</span>
<a name="line-1964"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>28</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varid'>height</span><span class='hs-layout'>)</span>
<a name="line-1965"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintResizeInc</span><span class='hs-layout'>)</span>
<a name="line-1966"></a> <span class='hs-varid'>aspectFlag</span> <span class='hs-keyglyph'><-</span> <span class='hs-keyword'>case</span> <span class='hs-varid'>aspect</span> <span class='hs-keyword'>of</span>
<a name="line-1967"></a> <span class='hs-conid'>Nothing</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>return</span> <span class='hs-num'>0</span>
<a name="line-1968"></a> <span class='hs-conid'>Just</span> <span class='hs-layout'>(</span><span class='hs-varid'>min</span><span class='hs-layout'>,</span> <span class='hs-varid'>max</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span>
<a name="line-1969"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>32</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CDouble</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>realToFrac</span> <span class='hs-varid'>min</span><span class='hs-layout'>)</span>
<a name="line-1970"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>ptr</span> <span class='hs-varid'>val</span> <span class='hs-keyglyph'>-></span> <span class='hs-keyword'>do</span> <span class='hs-layout'>{</span><span class='hs-varid'>pokeByteOff</span> <span class='hs-varid'>ptr</span> <span class='hs-num'>40</span> <span class='hs-layout'>(</span><span class='hs-varid'>val</span><span class='hs-keyglyph'>::</span><span class='hs-conid'>CDouble</span><span class='hs-layout'>)</span><span class='hs-layout'>}</span><span class='hs-layout'>)</span> <span class='hs-varid'>geometryPtr</span> <span class='hs-layout'>(</span><span class='hs-varid'>realToFrac</span> <span class='hs-varid'>max</span><span class='hs-layout'>)</span>
<a name="line-1971"></a> <span class='hs-varid'>return</span> <span class='hs-layout'>(</span><span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintAspect</span><span class='hs-layout'>)</span>
<a name="line-1972"></a>
<a name="line-1973"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-conid'>Widget</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg2</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr2</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_geometry_hints</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>argPtr2</span> <span class='hs-varid'>arg3</span> <span class='hs-varid'>arg4</span><span class='hs-layout'>)</span>
<a name="line-1974"></a><span class='hs-comment'>{-# LINE 1879 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-1975"></a> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-1976"></a> <span class='hs-layout'>(</span><span class='hs-varid'>maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Widget</span> <span class='hs-varid'>nullForeignPtr</span><span class='hs-layout'>)</span> <span class='hs-varid'>toWidget</span> <span class='hs-varid'>geometryWidget</span><span class='hs-layout'>)</span>
<a name="line-1977"></a> <span class='hs-varid'>geometryPtr</span>
<a name="line-1978"></a> <span class='hs-layout'>(</span><span class='hs-varid'>fromIntegral</span> <span class='hs-varop'>$</span> <span class='hs-varid'>minSizeFlag</span> <span class='hs-varop'>.|.</span> <span class='hs-varid'>maxSizeFlag</span> <span class='hs-varop'>.|.</span> <span class='hs-varid'>baseSizeFlag</span>
<a name="line-1979"></a> <span class='hs-varop'>.|.</span> <span class='hs-varid'>incSizeFlag</span> <span class='hs-varop'>.|.</span> <span class='hs-varid'>aspectFlag</span><span class='hs-layout'>)</span>
<a name="line-1980"></a>
<a name="line-1981"></a><a name="GdkWindowHints"></a><span class='hs-keyword'>data</span> <span class='hs-conid'>GdkWindowHints</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintPos</span>
<a name="line-1982"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>GdkHintMinSize</span>
<a name="line-1983"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>GdkHintMaxSize</span>
<a name="line-1984"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>GdkHintBaseSize</span>
<a name="line-1985"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>GdkHintAspect</span>
<a name="line-1986"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>GdkHintResizeInc</span>
<a name="line-1987"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>GdkHintWinGravity</span>
<a name="line-1988"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>GdkHintUserPos</span>
<a name="line-1989"></a> <span class='hs-keyglyph'>|</span> <span class='hs-conid'>GdkHintUserSize</span>
<a name="line-1990"></a>
<a name="line-1991"></a><span class='hs-keyword'>instance</span> <span class='hs-conid'>Enum</span> <span class='hs-conid'>GdkWindowHints</span> <span class='hs-keyword'>where</span>
<a name="line-1992"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintPos</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>1</span>
<a name="line-1993"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintMinSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>2</span>
<a name="line-1994"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintMaxSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>4</span>
<a name="line-1995"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintBaseSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>8</span>
<a name="line-1996"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintAspect</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>16</span>
<a name="line-1997"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintResizeInc</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>32</span>
<a name="line-1998"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintWinGravity</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>64</span>
<a name="line-1999"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintUserPos</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>128</span>
<a name="line-2000"></a> <span class='hs-varid'>fromEnum</span> <span class='hs-conid'>GdkHintUserSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-num'>256</span>
<a name="line-2001"></a>
<a name="line-2002"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>1</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintPos</span>
<a name="line-2003"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>2</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintMinSize</span>
<a name="line-2004"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>4</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintMaxSize</span>
<a name="line-2005"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>8</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintBaseSize</span>
<a name="line-2006"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>16</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintAspect</span>
<a name="line-2007"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>32</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintResizeInc</span>
<a name="line-2008"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>64</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintWinGravity</span>
<a name="line-2009"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>128</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintUserPos</span>
<a name="line-2010"></a> <span class='hs-varid'>toEnum</span> <span class='hs-num'>256</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintUserSize</span>
<a name="line-2011"></a> <span class='hs-varid'>toEnum</span> <span class='hs-varid'>unmatched</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>error</span> <span class='hs-layout'>(</span><span class='hs-str'>"GdkWindowHints.toEnum: Cannot match "</span> <span class='hs-varop'>++</span> <span class='hs-varid'>show</span> <span class='hs-varid'>unmatched</span><span class='hs-layout'>)</span>
<a name="line-2012"></a>
<a name="line-2013"></a> <span class='hs-varid'>succ</span> <span class='hs-conid'>GdkHintPos</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintMinSize</span>
<a name="line-2014"></a> <span class='hs-varid'>succ</span> <span class='hs-conid'>GdkHintMinSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintMaxSize</span>
<a name="line-2015"></a> <span class='hs-varid'>succ</span> <span class='hs-conid'>GdkHintMaxSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintBaseSize</span>
<a name="line-2016"></a> <span class='hs-varid'>succ</span> <span class='hs-conid'>GdkHintBaseSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintAspect</span>
<a name="line-2017"></a> <span class='hs-varid'>succ</span> <span class='hs-conid'>GdkHintAspect</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintResizeInc</span>
<a name="line-2018"></a> <span class='hs-varid'>succ</span> <span class='hs-conid'>GdkHintResizeInc</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintWinGravity</span>
<a name="line-2019"></a> <span class='hs-varid'>succ</span> <span class='hs-conid'>GdkHintWinGravity</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintUserPos</span>
<a name="line-2020"></a> <span class='hs-varid'>succ</span> <span class='hs-conid'>GdkHintUserPos</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintUserSize</span>
<a name="line-2021"></a> <span class='hs-varid'>succ</span> <span class='hs-keyword'>_</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>undefined</span>
<a name="line-2022"></a>
<a name="line-2023"></a> <span class='hs-varid'>pred</span> <span class='hs-conid'>GdkHintMinSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintPos</span>
<a name="line-2024"></a> <span class='hs-varid'>pred</span> <span class='hs-conid'>GdkHintMaxSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintMinSize</span>
<a name="line-2025"></a> <span class='hs-varid'>pred</span> <span class='hs-conid'>GdkHintBaseSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintMaxSize</span>
<a name="line-2026"></a> <span class='hs-varid'>pred</span> <span class='hs-conid'>GdkHintAspect</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintBaseSize</span>
<a name="line-2027"></a> <span class='hs-varid'>pred</span> <span class='hs-conid'>GdkHintResizeInc</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintAspect</span>
<a name="line-2028"></a> <span class='hs-varid'>pred</span> <span class='hs-conid'>GdkHintWinGravity</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintResizeInc</span>
<a name="line-2029"></a> <span class='hs-varid'>pred</span> <span class='hs-conid'>GdkHintUserPos</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintWinGravity</span>
<a name="line-2030"></a> <span class='hs-varid'>pred</span> <span class='hs-conid'>GdkHintUserSize</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>GdkHintUserPos</span>
<a name="line-2031"></a> <span class='hs-varid'>pred</span> <span class='hs-keyword'>_</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>undefined</span>
<a name="line-2032"></a>
<a name="line-2033"></a> <span class='hs-varid'>enumFromTo</span> <span class='hs-varid'>x</span> <span class='hs-varid'>y</span> <span class='hs-keyglyph'>|</span> <span class='hs-varid'>fromEnum</span> <span class='hs-varid'>x</span> <span class='hs-varop'>==</span> <span class='hs-varid'>fromEnum</span> <span class='hs-varid'>y</span> <span class='hs-keyglyph'>=</span> <span class='hs-keyglyph'>[</span> <span class='hs-varid'>y</span> <span class='hs-keyglyph'>]</span>
<a name="line-2034"></a> <span class='hs-keyglyph'>|</span> <span class='hs-varid'>otherwise</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>x</span> <span class='hs-conop'>:</span> <span class='hs-varid'>enumFromTo</span> <span class='hs-layout'>(</span><span class='hs-varid'>succ</span> <span class='hs-varid'>x</span><span class='hs-layout'>)</span> <span class='hs-varid'>y</span>
<a name="line-2035"></a> <span class='hs-varid'>enumFrom</span> <span class='hs-varid'>x</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>enumFromTo</span> <span class='hs-varid'>x</span> <span class='hs-conid'>GdkHintUserSize</span>
<a name="line-2036"></a> <span class='hs-varid'>enumFromThen</span> <span class='hs-keyword'>_</span> <span class='hs-keyword'>_</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>error</span> <span class='hs-str'>"Enum GdkWindowHints: enumFromThen not implemented"</span>
<a name="line-2037"></a> <span class='hs-varid'>enumFromThenTo</span> <span class='hs-keyword'>_</span> <span class='hs-keyword'>_</span> <span class='hs-keyword'>_</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>error</span> <span class='hs-str'>"Enum GdkWindowHints: enumFromThenTo not implemented"</span>
<a name="line-2038"></a>
<a name="line-2039"></a><span class='hs-comment'>{-# LINE 1886 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-2040"></a>
<a name="line-2041"></a>
<a name="line-2042"></a><a name="windowSetOpacity"></a><span class='hs-comment'>-- | Request the windowing system to make window partially transparent, with opacity 0 being fully transparent and 1 fully opaque.</span>
<a name="line-2043"></a><span class='hs-comment'>-- (Values of the opacity parameter are clamped to the [0,1] range.)</span>
<a name="line-2044"></a><span class='hs-comment'>-- On X11 this has any effect only on X screens with a compositing manager running.</span>
<a name="line-2045"></a><span class='hs-comment'>-- See 'widgetIsComposited'. On Windows it should work always.</span>
<a name="line-2046"></a><span class='hs-comment'>--</span>
<a name="line-2047"></a><span class='hs-comment'>-- Note that setting a window's opacity after the window has been shown causes it to</span>
<a name="line-2048"></a><span class='hs-comment'>-- flicker once on Windows.</span>
<a name="line-2049"></a><span class='hs-comment'>--</span>
<a name="line-2050"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.12</span>
<a name="line-2051"></a><span class='hs-comment'>--</span>
<a name="line-2052"></a><span class='hs-definition'>windowSetOpacity</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-2053"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>Double</span> <span class='hs-comment'>-- ^ @opacity@ - desired opacity, between 0 and 1</span>
<a name="line-2054"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span>
<a name="line-2055"></a><span class='hs-definition'>windowSetOpacity</span> <span class='hs-varid'>self</span> <span class='hs-varid'>opacity</span> <span class='hs-keyglyph'>=</span>
<a name="line-2056"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-varid'>arg2</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_set_opacity</span> <span class='hs-varid'>argPtr1</span> <span class='hs-varid'>arg2</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-varid'>realToFrac</span> <span class='hs-varid'>opacity</span><span class='hs-layout'>)</span>
<a name="line-2057"></a>
<a name="line-2058"></a><a name="windowGetOpacity"></a><span class='hs-comment'>-- | Fetches the requested opacity for this window. See 'windowSetOpacity'.</span>
<a name="line-2059"></a><span class='hs-comment'>--</span>
<a name="line-2060"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.12</span>
<a name="line-2061"></a><span class='hs-comment'>--</span>
<a name="line-2062"></a><span class='hs-definition'>windowGetOpacity</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-2063"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>Double</span> <span class='hs-comment'>-- ^ return the requested opacity for this window.</span>
<a name="line-2064"></a><span class='hs-definition'>windowGetOpacity</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>liftM</span> <span class='hs-varid'>realToFrac</span> <span class='hs-varop'>$</span>
<a name="line-2065"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_opacity</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-2066"></a>
<a name="line-2067"></a>
<a name="line-2068"></a>
<a name="line-2069"></a><a name="windowGetGroup"></a><span class='hs-comment'>-- | Returns the group for window or the default group, if window is @Nothing@ or if window does not have an explicit window group.</span>
<a name="line-2070"></a><span class='hs-comment'>--</span>
<a name="line-2071"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.10</span>
<a name="line-2072"></a><span class='hs-comment'>--</span>
<a name="line-2073"></a><span class='hs-definition'>windowGetGroup</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Maybe</span> <span class='hs-varid'>self</span>
<a name="line-2074"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>WindowGroup</span> <span class='hs-comment'>-- ^ return the 'WindowGroup' for a window or the default group</span>
<a name="line-2075"></a><span class='hs-definition'>windowGetGroup</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=</span>
<a name="line-2076"></a> <span class='hs-varid'>makeNewGObject</span> <span class='hs-varid'>mkWindowGroup</span> <span class='hs-varop'>$</span>
<a name="line-2077"></a> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>arg1</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-varid'>withForeignPtr</span> <span class='hs-varid'>arg1</span> <span class='hs-varop'>$</span> <span class='hs-keyglyph'>\</span><span class='hs-varid'>argPtr1</span> <span class='hs-keyglyph'>-></span><span class='hs-varid'>gtk_window_get_group</span> <span class='hs-varid'>argPtr1</span><span class='hs-layout'>)</span> <span class='hs-layout'>(</span><span class='hs-varid'>maybe</span> <span class='hs-layout'>(</span><span class='hs-conid'>Window</span> <span class='hs-varid'>nullForeignPtr</span><span class='hs-layout'>)</span> <span class='hs-varid'>toWindow</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-2078"></a>
<a name="line-2079"></a>
<a name="line-2080"></a><span class='hs-comment'>--------------------</span>
<a name="line-2081"></a><span class='hs-comment'>-- Attributes</span>
<a name="line-2082"></a>
<a name="line-2083"></a><a name="windowTitle"></a><span class='hs-comment'>-- | The title of the window.</span>
<a name="line-2084"></a><span class='hs-comment'>--</span>
<a name="line-2085"></a><span class='hs-definition'>windowTitle</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>String</span>
<a name="line-2086"></a><span class='hs-definition'>windowTitle</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2087"></a> <span class='hs-varid'>windowGetTitle</span>
<a name="line-2088"></a> <span class='hs-varid'>windowSetTitle</span>
<a name="line-2089"></a>
<a name="line-2090"></a><a name="windowType"></a><span class='hs-comment'>-- | The type of the window.</span>
<a name="line-2091"></a><span class='hs-comment'>--</span>
<a name="line-2092"></a><span class='hs-comment'>-- Default value: 'WindowToplevel'</span>
<a name="line-2093"></a><span class='hs-comment'>--</span>
<a name="line-2094"></a><span class='hs-definition'>windowType</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>ReadAttr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>WindowType</span>
<a name="line-2095"></a><span class='hs-definition'>windowType</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>readAttrFromEnumProperty</span> <span class='hs-str'>"type"</span>
<a name="line-2096"></a> <span class='hs-varid'>gtk_window_type_get_type</span>
<a name="line-2097"></a><span class='hs-comment'>{-# LINE 1943 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-2098"></a>
<a name="line-2099"></a><a name="windowAllowShrink"></a><span class='hs-comment'>-- | If @True@, the window has no mimimum size. Setting this to @True@ is 99%</span>
<a name="line-2100"></a><span class='hs-comment'>-- of the time a bad idea.</span>
<a name="line-2101"></a><span class='hs-comment'>--</span>
<a name="line-2102"></a><span class='hs-comment'>-- Default value: @False@</span>
<a name="line-2103"></a><span class='hs-comment'>--</span>
<a name="line-2104"></a><span class='hs-definition'>windowAllowShrink</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2105"></a><span class='hs-definition'>windowAllowShrink</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromBoolProperty</span> <span class='hs-str'>"allow-shrink"</span>
<a name="line-2106"></a>
<a name="line-2107"></a><a name="windowAllowGrow"></a><span class='hs-comment'>-- | If @True@, users can expand the window beyond its minimum size.</span>
<a name="line-2108"></a><span class='hs-comment'>--</span>
<a name="line-2109"></a><span class='hs-comment'>-- Default value: @True@</span>
<a name="line-2110"></a><span class='hs-comment'>--</span>
<a name="line-2111"></a><span class='hs-definition'>windowAllowGrow</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2112"></a><span class='hs-definition'>windowAllowGrow</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromBoolProperty</span> <span class='hs-str'>"allow-grow"</span>
<a name="line-2113"></a>
<a name="line-2114"></a><a name="windowResizable"></a><span class='hs-comment'>-- | If @True@, users can resize the window.</span>
<a name="line-2115"></a><span class='hs-comment'>--</span>
<a name="line-2116"></a><span class='hs-comment'>-- Default value: @True@</span>
<a name="line-2117"></a><span class='hs-comment'>--</span>
<a name="line-2118"></a><span class='hs-definition'>windowResizable</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2119"></a><span class='hs-definition'>windowResizable</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2120"></a> <span class='hs-varid'>windowGetResizable</span>
<a name="line-2121"></a> <span class='hs-varid'>windowSetResizable</span>
<a name="line-2122"></a>
<a name="line-2123"></a><a name="windowModal"></a><span class='hs-comment'>-- | If @True@, the window is modal (other windows are not usable while this</span>
<a name="line-2124"></a><span class='hs-comment'>-- one is up).</span>
<a name="line-2125"></a><span class='hs-comment'>--</span>
<a name="line-2126"></a><span class='hs-comment'>-- Default value: @False@</span>
<a name="line-2127"></a><span class='hs-comment'>--</span>
<a name="line-2128"></a><span class='hs-definition'>windowModal</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2129"></a><span class='hs-definition'>windowModal</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2130"></a> <span class='hs-varid'>windowGetModal</span>
<a name="line-2131"></a> <span class='hs-varid'>windowSetModal</span>
<a name="line-2132"></a>
<a name="line-2133"></a>
<a name="line-2134"></a><a name="windowOpacity"></a><span class='hs-comment'>-- | The requested opacity of the window. See 'windowSetOpacity' for more details about window opacity.</span>
<a name="line-2135"></a><span class='hs-comment'>--</span>
<a name="line-2136"></a><span class='hs-comment'>-- Allowed values: [0,1]</span>
<a name="line-2137"></a><span class='hs-comment'>--</span>
<a name="line-2138"></a><span class='hs-comment'>-- Default values: 1</span>
<a name="line-2139"></a><span class='hs-comment'>--</span>
<a name="line-2140"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.12</span>
<a name="line-2141"></a><span class='hs-comment'>--</span>
<a name="line-2142"></a><span class='hs-definition'>windowOpacity</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Double</span>
<a name="line-2143"></a><span class='hs-definition'>windowOpacity</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromDoubleProperty</span> <span class='hs-str'>"opacity"</span>
<a name="line-2144"></a>
<a name="line-2145"></a>
<a name="line-2146"></a><a name="windowFocus"></a><span class='hs-comment'>-- | If @focus@ is not the current focus widget, and is focusable, sets it as</span>
<a name="line-2147"></a><span class='hs-comment'>-- the focus widget for the window. If @focus@ is @Nothing@, unsets the focus widget for</span>
<a name="line-2148"></a><span class='hs-comment'>-- this window. To set the focus to a particular widget in the toplevel, it is</span>
<a name="line-2149"></a><span class='hs-comment'>-- usually more convenient to use 'widgetGrabFocus' instead of this function.</span>
<a name="line-2150"></a><span class='hs-comment'>--</span>
<a name="line-2151"></a><span class='hs-definition'>windowFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span>
<a name="line-2152"></a><span class='hs-definition'>windowFocus</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2153"></a> <span class='hs-varid'>windowGetFocus</span>
<a name="line-2154"></a> <span class='hs-varid'>windowSetFocus</span>
<a name="line-2155"></a>
<a name="line-2156"></a><a name="windowHasFrame"></a><span class='hs-comment'>-- | (Note: this is a special-purpose function for the framebuffer port, that</span>
<a name="line-2157"></a><span class='hs-comment'>-- causes Gtk+ to draw its own window border. For most applications, you want</span>
<a name="line-2158"></a><span class='hs-comment'>-- 'windowSetDecorated' instead, which tells the window manager whether to draw</span>
<a name="line-2159"></a><span class='hs-comment'>-- the window border.)</span>
<a name="line-2160"></a><span class='hs-comment'>--</span>
<a name="line-2161"></a><span class='hs-comment'>-- If this function is called on a window with setting of @True@, before it</span>
<a name="line-2162"></a><span class='hs-comment'>-- is realized or showed, it will have a \"frame\" window around</span>
<a name="line-2163"></a><span class='hs-comment'>-- its 'DrawWindow', accessible using 'windowGetFrame'. Using the signal</span>
<a name="line-2164"></a><span class='hs-comment'>-- 'windowFrameEvent' you can receive all events targeted at the frame.</span>
<a name="line-2165"></a><span class='hs-comment'>--</span>
<a name="line-2166"></a><span class='hs-comment'>-- This function is used by the 1 -fb port to implement managed windows,</span>
<a name="line-2167"></a><span class='hs-comment'>-- but it could conceivably be used by X-programs that want to do their own</span>
<a name="line-2168"></a><span class='hs-comment'>-- window decorations.</span>
<a name="line-2169"></a><span class='hs-comment'>--</span>
<a name="line-2170"></a><span class='hs-definition'>windowHasFrame</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2171"></a><span class='hs-definition'>windowHasFrame</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2172"></a> <span class='hs-varid'>windowGetHasFrame</span>
<a name="line-2173"></a> <span class='hs-varid'>windowSetHasFrame</span>
<a name="line-2174"></a>
<a name="line-2175"></a><a name="windowIconList"></a><span class='hs-comment'>-- | Sets up the icon representing a 'Window'. The icon is used when the</span>
<a name="line-2176"></a><span class='hs-comment'>-- window is minimized (also known as iconified). Some window managers or</span>
<a name="line-2177"></a><span class='hs-comment'>-- desktop environments may also place it in the window frame, or display it in</span>
<a name="line-2178"></a><span class='hs-comment'>-- other contexts.</span>
<a name="line-2179"></a><span class='hs-comment'>--</span>
<a name="line-2180"></a><span class='hs-comment'>-- By passing several sizes, you may improve the final image quality of the</span>
<a name="line-2181"></a><span class='hs-comment'>-- icon, by reducing or eliminating automatic image scaling.</span>
<a name="line-2182"></a><span class='hs-comment'>--</span>
<a name="line-2183"></a><span class='hs-comment'>-- Recommended sizes to provide: 16x16, 32x32, 48x48 at minimum, and larger</span>
<a name="line-2184"></a><span class='hs-comment'>-- images (64x64, 128x128) if you have them.</span>
<a name="line-2185"></a><span class='hs-comment'>--</span>
<a name="line-2186"></a><span class='hs-comment'>-- See also 'windowSetDefaultIconList' to set the icon for all windows in</span>
<a name="line-2187"></a><span class='hs-comment'>-- your application in one go.</span>
<a name="line-2188"></a><span class='hs-comment'>--</span>
<a name="line-2189"></a><span class='hs-comment'>-- Note that transient windows (those who have been set transient for</span>
<a name="line-2190"></a><span class='hs-comment'>-- another window using 'windowSetTransientFor') will inherit their icon from</span>
<a name="line-2191"></a><span class='hs-comment'>-- their transient parent. So there's no need to explicitly set the icon on</span>
<a name="line-2192"></a><span class='hs-comment'>-- transient windows.</span>
<a name="line-2193"></a><span class='hs-comment'>--</span>
<a name="line-2194"></a><span class='hs-definition'>windowIconList</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Pixbuf</span><span class='hs-keyglyph'>]</span>
<a name="line-2195"></a><span class='hs-definition'>windowIconList</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2196"></a> <span class='hs-varid'>windowGetIconList</span>
<a name="line-2197"></a> <span class='hs-varid'>windowSetIconList</span>
<a name="line-2198"></a>
<a name="line-2199"></a><a name="windowMnemonicModifier"></a><span class='hs-comment'>-- | The mnemonic modifier for this window.</span>
<a name="line-2200"></a><span class='hs-comment'>--</span>
<a name="line-2201"></a><span class='hs-definition'>windowMnemonicModifier</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>[</span><span class='hs-conid'>Modifier</span><span class='hs-keyglyph'>]</span>
<a name="line-2202"></a><span class='hs-definition'>windowMnemonicModifier</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2203"></a> <span class='hs-varid'>windowGetMnemonicModifier</span>
<a name="line-2204"></a> <span class='hs-varid'>windowSetMnemonicModifier</span>
<a name="line-2205"></a>
<a name="line-2206"></a><a name="windowRole"></a><span class='hs-comment'>-- | Unique identifier for the window to be used when restoring a session.</span>
<a name="line-2207"></a><span class='hs-comment'>--</span>
<a name="line-2208"></a><span class='hs-comment'>-- Default value: "\\"</span>
<a name="line-2209"></a><span class='hs-comment'>--</span>
<a name="line-2210"></a><span class='hs-definition'>windowRole</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>String</span>
<a name="line-2211"></a><span class='hs-definition'>windowRole</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromStringProperty</span> <span class='hs-str'>"role"</span>
<a name="line-2212"></a>
<a name="line-2213"></a>
<a name="line-2214"></a><a name="windowStartupId"></a><span class='hs-comment'>-- | The 'windowStartupId' is a write-only property for setting window's startup notification identifier.</span>
<a name="line-2215"></a><span class='hs-comment'>--</span>
<a name="line-2216"></a><span class='hs-comment'>-- Default value: "\\"</span>
<a name="line-2217"></a><span class='hs-comment'>--</span>
<a name="line-2218"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.12</span>
<a name="line-2219"></a><span class='hs-comment'>--</span>
<a name="line-2220"></a><span class='hs-definition'>windowStartupId</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>String</span>
<a name="line-2221"></a><span class='hs-definition'>windowStartupId</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromStringProperty</span> <span class='hs-str'>"startup-id"</span>
<a name="line-2222"></a>
<a name="line-2223"></a>
<a name="line-2224"></a><a name="windowWindowPosition"></a><span class='hs-comment'>-- | The initial position of the window.</span>
<a name="line-2225"></a><span class='hs-comment'>--</span>
<a name="line-2226"></a><span class='hs-comment'>-- Default value: 'WinPosNone'</span>
<a name="line-2227"></a><span class='hs-comment'>--</span>
<a name="line-2228"></a><span class='hs-definition'>windowWindowPosition</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>WindowPosition</span>
<a name="line-2229"></a><span class='hs-definition'>windowWindowPosition</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromEnumProperty</span> <span class='hs-str'>"window-position"</span>
<a name="line-2230"></a> <span class='hs-varid'>gtk_window_position_get_type</span>
<a name="line-2231"></a><span class='hs-comment'>{-# LINE 2076 "./Graphics/UI/Gtk/Windows/Window.chs" #-}</span>
<a name="line-2232"></a>
<a name="line-2233"></a><a name="windowDefaultWidth"></a><span class='hs-comment'>-- | The default width of the window, used when initially showing the window.</span>
<a name="line-2234"></a><span class='hs-comment'>--</span>
<a name="line-2235"></a><span class='hs-comment'>-- Allowed values: >= -1</span>
<a name="line-2236"></a><span class='hs-comment'>--</span>
<a name="line-2237"></a><span class='hs-comment'>-- Default value: -1</span>
<a name="line-2238"></a><span class='hs-comment'>--</span>
<a name="line-2239"></a><span class='hs-definition'>windowDefaultWidth</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Int</span>
<a name="line-2240"></a><span class='hs-definition'>windowDefaultWidth</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromIntProperty</span> <span class='hs-str'>"default-width"</span>
<a name="line-2241"></a>
<a name="line-2242"></a><a name="windowDefaultHeight"></a><span class='hs-comment'>-- | The default height of the window, used when initially showing the window.</span>
<a name="line-2243"></a><span class='hs-comment'>--</span>
<a name="line-2244"></a><span class='hs-comment'>-- Allowed values: >= -1</span>
<a name="line-2245"></a><span class='hs-comment'>--</span>
<a name="line-2246"></a><span class='hs-comment'>-- Default value: -1</span>
<a name="line-2247"></a><span class='hs-comment'>--</span>
<a name="line-2248"></a><span class='hs-definition'>windowDefaultHeight</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Int</span>
<a name="line-2249"></a><span class='hs-definition'>windowDefaultHeight</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromIntProperty</span> <span class='hs-str'>"default-height"</span>
<a name="line-2250"></a>
<a name="line-2251"></a><a name="windowDeletable"></a><span class='hs-comment'>-- | Whether the window frame should have a close button.</span>
<a name="line-2252"></a><span class='hs-comment'>--</span>
<a name="line-2253"></a><span class='hs-comment'>-- Default values: @True@</span>
<a name="line-2254"></a><span class='hs-comment'>--</span>
<a name="line-2255"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.10</span>
<a name="line-2256"></a><span class='hs-comment'>--</span>
<a name="line-2257"></a><span class='hs-definition'>windowDeletable</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2258"></a><span class='hs-definition'>windowDeletable</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromBoolProperty</span> <span class='hs-str'>"deletable"</span>
<a name="line-2259"></a>
<a name="line-2260"></a><a name="windowDestroyWithParent"></a><span class='hs-comment'>-- | If this window should be destroyed when the parent is destroyed.</span>
<a name="line-2261"></a><span class='hs-comment'>--</span>
<a name="line-2262"></a><span class='hs-comment'>-- Default value: @False@</span>
<a name="line-2263"></a><span class='hs-comment'>--</span>
<a name="line-2264"></a><span class='hs-definition'>windowDestroyWithParent</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2265"></a><span class='hs-definition'>windowDestroyWithParent</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2266"></a> <span class='hs-varid'>windowGetDestroyWithParent</span>
<a name="line-2267"></a> <span class='hs-varid'>windowSetDestroyWithParent</span>
<a name="line-2268"></a>
<a name="line-2269"></a><a name="windowIcon"></a><span class='hs-comment'>-- | Icon for this window.</span>
<a name="line-2270"></a><span class='hs-comment'>--</span>
<a name="line-2271"></a><span class='hs-definition'>windowIcon</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>Pixbuf</span><span class='hs-layout'>)</span>
<a name="line-2272"></a><span class='hs-definition'>windowIcon</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2273"></a> <span class='hs-varid'>windowGetIcon</span>
<a name="line-2274"></a> <span class='hs-varid'>windowSetIcon</span>
<a name="line-2275"></a>
<a name="line-2276"></a><a name="windowIconName"></a><span class='hs-comment'>-- | The 'windowIconName' property specifies the name of the themed icon to use as the window icon. See 'IconTheme' for more details.</span>
<a name="line-2277"></a><span class='hs-comment'>--</span>
<a name="line-2278"></a><span class='hs-comment'>-- Default values: "\\"</span>
<a name="line-2279"></a><span class='hs-comment'>--</span>
<a name="line-2280"></a><span class='hs-comment'>-- * Available since Gtk+ version 2.6</span>
<a name="line-2281"></a><span class='hs-comment'>--</span>
<a name="line-2282"></a><span class='hs-comment'>--</span>
<a name="line-2283"></a><span class='hs-definition'>windowIconName</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>String</span>
<a name="line-2284"></a><span class='hs-definition'>windowIconName</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromStringProperty</span> <span class='hs-str'>"icon-name"</span>
<a name="line-2285"></a>
<a name="line-2286"></a>
<a name="line-2287"></a><a name="windowScreen"></a><span class='hs-comment'>-- | The screen where this window will be displayed.</span>
<a name="line-2288"></a><span class='hs-comment'>--</span>
<a name="line-2289"></a><span class='hs-definition'>windowScreen</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Screen</span>
<a name="line-2290"></a><span class='hs-definition'>windowScreen</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2291"></a> <span class='hs-varid'>windowGetScreen</span>
<a name="line-2292"></a> <span class='hs-varid'>windowSetScreen</span>
<a name="line-2293"></a>
<a name="line-2294"></a>
<a name="line-2295"></a><a name="windowTypeHint"></a><span class='hs-comment'>-- | Hint to help the desktop environment understand what kind of window this</span>
<a name="line-2296"></a><span class='hs-comment'>-- is and how to treat it.</span>
<a name="line-2297"></a><span class='hs-comment'>--</span>
<a name="line-2298"></a><span class='hs-comment'>-- Default value: 'WindowTypeHintNormal'</span>
<a name="line-2299"></a><span class='hs-comment'>--</span>
<a name="line-2300"></a><span class='hs-definition'>windowTypeHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>WindowTypeHint</span>
<a name="line-2301"></a><span class='hs-definition'>windowTypeHint</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2302"></a> <span class='hs-varid'>windowGetTypeHint</span>
<a name="line-2303"></a> <span class='hs-varid'>windowSetTypeHint</span>
<a name="line-2304"></a>
<a name="line-2305"></a>
<a name="line-2306"></a><a name="windowSkipTaskbarHint"></a><span class='hs-comment'>-- | @True@ if the window should not be in the task bar.</span>
<a name="line-2307"></a><span class='hs-comment'>--</span>
<a name="line-2308"></a><span class='hs-comment'>-- Default value: @False@</span>
<a name="line-2309"></a><span class='hs-comment'>--</span>
<a name="line-2310"></a><span class='hs-definition'>windowSkipTaskbarHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2311"></a><span class='hs-definition'>windowSkipTaskbarHint</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2312"></a> <span class='hs-varid'>windowGetSkipTaskbarHint</span>
<a name="line-2313"></a> <span class='hs-varid'>windowSetSkipTaskbarHint</span>
<a name="line-2314"></a>
<a name="line-2315"></a><a name="windowSkipPagerHint"></a><span class='hs-comment'>-- | @True@ if the window should not be in the pager.</span>
<a name="line-2316"></a><span class='hs-comment'>--</span>
<a name="line-2317"></a><span class='hs-comment'>-- Default value: @False@</span>
<a name="line-2318"></a><span class='hs-comment'>--</span>
<a name="line-2319"></a><span class='hs-definition'>windowSkipPagerHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2320"></a><span class='hs-definition'>windowSkipPagerHint</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2321"></a> <span class='hs-varid'>windowGetSkipPagerHint</span>
<a name="line-2322"></a> <span class='hs-varid'>windowSetSkipPagerHint</span>
<a name="line-2323"></a>
<a name="line-2324"></a>
<a name="line-2325"></a>
<a name="line-2326"></a><a name="windowUrgencyHint"></a><span class='hs-comment'>-- | @True@ if the window should be brought to the user's attention.</span>
<a name="line-2327"></a><span class='hs-comment'>--</span>
<a name="line-2328"></a><span class='hs-comment'>-- Default value: @False@</span>
<a name="line-2329"></a><span class='hs-comment'>--</span>
<a name="line-2330"></a><span class='hs-definition'>windowUrgencyHint</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2331"></a><span class='hs-definition'>windowUrgencyHint</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2332"></a> <span class='hs-varid'>windowGetUrgencyHint</span>
<a name="line-2333"></a> <span class='hs-varid'>windowSetUrgencyHint</span>
<a name="line-2334"></a>
<a name="line-2335"></a>
<a name="line-2336"></a>
<a name="line-2337"></a><a name="windowAcceptFocus"></a><span class='hs-comment'>-- | @True@ if the window should receive the input focus.</span>
<a name="line-2338"></a><span class='hs-comment'>--</span>
<a name="line-2339"></a><span class='hs-comment'>-- Default value: @True@</span>
<a name="line-2340"></a><span class='hs-comment'>--</span>
<a name="line-2341"></a><span class='hs-definition'>windowAcceptFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2342"></a><span class='hs-definition'>windowAcceptFocus</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2343"></a> <span class='hs-varid'>windowGetAcceptFocus</span>
<a name="line-2344"></a> <span class='hs-varid'>windowSetAcceptFocus</span>
<a name="line-2345"></a>
<a name="line-2346"></a>
<a name="line-2347"></a>
<a name="line-2348"></a><a name="windowFocusOnMap"></a><span class='hs-comment'>-- | @True@ if the window should receive the input focus when mapped.</span>
<a name="line-2349"></a><span class='hs-comment'>--</span>
<a name="line-2350"></a><span class='hs-comment'>-- Default value: @True@</span>
<a name="line-2351"></a><span class='hs-comment'>--</span>
<a name="line-2352"></a><span class='hs-definition'>windowFocusOnMap</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2353"></a><span class='hs-definition'>windowFocusOnMap</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2354"></a> <span class='hs-varid'>windowGetFocusOnMap</span>
<a name="line-2355"></a> <span class='hs-varid'>windowSetFocusOnMap</span>
<a name="line-2356"></a>
<a name="line-2357"></a>
<a name="line-2358"></a>
<a name="line-2359"></a><a name="windowDecorated"></a><span class='hs-comment'>-- | Whether the window should be decorated by the window manager.</span>
<a name="line-2360"></a><span class='hs-comment'>--</span>
<a name="line-2361"></a><span class='hs-comment'>-- Default value: @True@</span>
<a name="line-2362"></a><span class='hs-comment'>--</span>
<a name="line-2363"></a><span class='hs-definition'>windowDecorated</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2364"></a><span class='hs-definition'>windowDecorated</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2365"></a> <span class='hs-varid'>windowGetDecorated</span>
<a name="line-2366"></a> <span class='hs-varid'>windowSetDecorated</span>
<a name="line-2367"></a>
<a name="line-2368"></a><a name="windowGravity"></a><span class='hs-comment'>-- | The window gravity of the window. See 'windowMove' and 'Gravity' for more</span>
<a name="line-2369"></a><span class='hs-comment'>-- details about window gravity.</span>
<a name="line-2370"></a><span class='hs-comment'>--</span>
<a name="line-2371"></a><span class='hs-comment'>-- Default value: 'GravityNorthWest'</span>
<a name="line-2372"></a><span class='hs-comment'>--</span>
<a name="line-2373"></a><span class='hs-definition'>windowGravity</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Gravity</span>
<a name="line-2374"></a><span class='hs-definition'>windowGravity</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2375"></a> <span class='hs-varid'>windowGetGravity</span>
<a name="line-2376"></a> <span class='hs-varid'>windowSetGravity</span>
<a name="line-2377"></a>
<a name="line-2378"></a>
<a name="line-2379"></a><a name="windowToplevelFocus"></a><span class='hs-comment'>-- | Whether the input focus is within this GtkWindow.</span>
<a name="line-2380"></a><span class='hs-comment'>--</span>
<a name="line-2381"></a><span class='hs-comment'>-- Note: If add `window` before `HasToplevelFocus` (has-toplevel-focus attribute)</span>
<a name="line-2382"></a><span class='hs-comment'>-- will conflicts with fucntion `windowHasToplevelFocus`, so we named this attribute</span>
<a name="line-2383"></a><span class='hs-comment'>-- to `windowToplevelFocus`.</span>
<a name="line-2384"></a><span class='hs-comment'>--</span>
<a name="line-2385"></a><span class='hs-comment'>-- Default values: @False@</span>
<a name="line-2386"></a><span class='hs-comment'>--</span>
<a name="line-2387"></a><span class='hs-definition'>windowToplevelFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Attr</span> <span class='hs-varid'>self</span> <span class='hs-conid'>Bool</span>
<a name="line-2388"></a><span class='hs-definition'>windowToplevelFocus</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttrFromBoolProperty</span> <span class='hs-str'>"has-toplevel-focus"</span>
<a name="line-2389"></a>
<a name="line-2390"></a><a name="windowTransientFor"></a><span class='hs-comment'>-- | \'transientFor\' property. See 'windowGetTransientFor' and</span>
<a name="line-2391"></a><span class='hs-comment'>-- 'windowSetTransientFor'</span>
<a name="line-2392"></a><span class='hs-comment'>--</span>
<a name="line-2393"></a><span class='hs-definition'>windowTransientFor</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span><span class='hs-layout'>,</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>parent</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>ReadWriteAttr</span> <span class='hs-varid'>self</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-varid'>parent</span>
<a name="line-2394"></a><span class='hs-definition'>windowTransientFor</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>newAttr</span>
<a name="line-2395"></a> <span class='hs-varid'>windowGetTransientFor</span>
<a name="line-2396"></a> <span class='hs-varid'>windowSetTransientFor</span>
<a name="line-2397"></a>
<a name="line-2398"></a><span class='hs-comment'>--------------------</span>
<a name="line-2399"></a><span class='hs-comment'>-- Signals</span>
<a name="line-2400"></a>
<a name="line-2401"></a><a name="frameEvent"></a><span class='hs-comment'>-- | Observe events that are emitted on the frame of this window.</span>
<a name="line-2402"></a><span class='hs-comment'>--</span>
<a name="line-2403"></a><span class='hs-definition'>frameEvent</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Signal</span> <span class='hs-varid'>self</span> <span class='hs-layout'>(</span><span class='hs-conid'>EventM</span> <span class='hs-conid'>EAny</span> <span class='hs-conid'>Bool</span><span class='hs-layout'>)</span>
<a name="line-2404"></a><span class='hs-definition'>frameEvent</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>Signal</span> <span class='hs-layout'>(</span><span class='hs-keyglyph'>\</span><span class='hs-varid'>after</span> <span class='hs-varid'>obj</span> <span class='hs-varid'>fun</span> <span class='hs-keyglyph'>-></span>
<a name="line-2405"></a> <span class='hs-varid'>connect_PTR__BOOL</span> <span class='hs-str'>"frame-event"</span> <span class='hs-varid'>after</span> <span class='hs-varid'>obj</span> <span class='hs-layout'>(</span><span class='hs-varid'>runReaderT</span> <span class='hs-varid'>fun</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2406"></a>
<a name="line-2407"></a><a name="keysChanged"></a><span class='hs-comment'>-- | The 'keysChanged' signal gets emitted when the set of accelerators or mnemonics that are associated with window changes.</span>
<a name="line-2408"></a><span class='hs-comment'>--</span>
<a name="line-2409"></a><span class='hs-definition'>keysChanged</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Signal</span> <span class='hs-varid'>self</span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span>
<a name="line-2410"></a><span class='hs-definition'>keysChanged</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>Signal</span> <span class='hs-layout'>(</span><span class='hs-varid'>connect_NONE__NONE</span> <span class='hs-str'>"keys-changed"</span><span class='hs-layout'>)</span>
<a name="line-2411"></a>
<a name="line-2412"></a><a name="setFocus"></a><span class='hs-comment'>-- | Observe a change in input focus.</span>
<a name="line-2413"></a><span class='hs-comment'>--</span>
<a name="line-2414"></a><span class='hs-definition'>setFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span> <span class='hs-keyglyph'>=></span> <span class='hs-conid'>Signal</span> <span class='hs-varid'>self</span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-conid'>Widget</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span>
<a name="line-2415"></a><span class='hs-definition'>setFocus</span> <span class='hs-keyglyph'>=</span> <span class='hs-conid'>Signal</span> <span class='hs-layout'>(</span><span class='hs-varid'>connect_MOBJECT__NONE</span> <span class='hs-str'>"set-focus"</span><span class='hs-layout'>)</span>
<a name="line-2416"></a>
<a name="line-2417"></a><span class='hs-comment'>-- * Deprecated</span>
<a name="line-2418"></a>
<a name="line-2419"></a><a name="onSetFocus"></a><span class='hs-comment'>-- | Observe a change in input focus.</span>
<a name="line-2420"></a><span class='hs-comment'>--</span>
<a name="line-2421"></a><span class='hs-definition'>onSetFocus</span><span class='hs-layout'>,</span> <span class='hs-varid'>afterSetFocus</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>WindowClass</span> <span class='hs-varid'>self</span><span class='hs-layout'>,</span> <span class='hs-conid'>WidgetClass</span> <span class='hs-varid'>foc</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>=></span> <span class='hs-varid'>self</span>
<a name="line-2422"></a> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>Maybe</span> <span class='hs-varid'>foc</span> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span>
<a name="line-2423"></a> <span class='hs-keyglyph'>-></span> <span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>ConnectId</span> <span class='hs-varid'>self</span><span class='hs-layout'>)</span>
<a name="line-2424"></a><span class='hs-definition'>onSetFocus</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>connect_MOBJECT__NONE</span> <span class='hs-str'>"set-focus"</span> <span class='hs-conid'>False</span>
<a name="line-2425"></a><a name="afterSetFocus"></a><span class='hs-definition'>afterSetFocus</span> <span class='hs-keyglyph'>=</span> <span class='hs-varid'>connect_MOBJECT__NONE</span> <span class='hs-str'>"set-focus"</span> <span class='hs-conid'>True</span>
<a name="line-2426"></a>
<a name="line-2427"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_new"</span>
<a name="line-2428"></a> <span class='hs-varid'>gtk_window_new</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2429"></a>
<a name="line-2430"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_title"</span>
<a name="line-2431"></a> <span class='hs-varid'>gtk_window_set_title</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2432"></a>
<a name="line-2433"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_title"</span>
<a name="line-2434"></a> <span class='hs-varid'>gtk_window_get_title</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2435"></a>
<a name="line-2436"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_resizable"</span>
<a name="line-2437"></a> <span class='hs-varid'>gtk_window_set_resizable</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2438"></a>
<a name="line-2439"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>unsafe</span> <span class='hs-str'>"gtk_window_get_resizable"</span>
<a name="line-2440"></a> <span class='hs-varid'>gtk_window_get_resizable</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2441"></a>
<a name="line-2442"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_activate_focus"</span>
<a name="line-2443"></a> <span class='hs-varid'>gtk_window_activate_focus</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2444"></a>
<a name="line-2445"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_activate_default"</span>
<a name="line-2446"></a> <span class='hs-varid'>gtk_window_activate_default</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2447"></a>
<a name="line-2448"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_policy"</span>
<a name="line-2449"></a> <span class='hs-varid'>gtk_window_set_policy</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2450"></a>
<a name="line-2451"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_modal"</span>
<a name="line-2452"></a> <span class='hs-varid'>gtk_window_set_modal</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2453"></a>
<a name="line-2454"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_modal"</span>
<a name="line-2455"></a> <span class='hs-varid'>gtk_window_get_modal</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2456"></a>
<a name="line-2457"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_default_size"</span>
<a name="line-2458"></a> <span class='hs-varid'>gtk_window_set_default_size</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2459"></a>
<a name="line-2460"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_add_mnemonic"</span>
<a name="line-2461"></a> <span class='hs-varid'>gtk_window_add_mnemonic</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CUInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2462"></a>
<a name="line-2463"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_remove_mnemonic"</span>
<a name="line-2464"></a> <span class='hs-varid'>gtk_window_remove_mnemonic</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CUInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2465"></a>
<a name="line-2466"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_mnemonic_activate"</span>
<a name="line-2467"></a> <span class='hs-varid'>gtk_window_mnemonic_activate</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CUInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2468"></a>
<a name="line-2469"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_mnemonic_modifier"</span>
<a name="line-2470"></a> <span class='hs-varid'>gtk_window_set_mnemonic_modifier</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2471"></a>
<a name="line-2472"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_mnemonic_modifier"</span>
<a name="line-2473"></a> <span class='hs-varid'>gtk_window_get_mnemonic_modifier</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2474"></a>
<a name="line-2475"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_activate_key"</span>
<a name="line-2476"></a> <span class='hs-varid'>gtk_window_activate_key</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2477"></a>
<a name="line-2478"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_propagate_key_event"</span>
<a name="line-2479"></a> <span class='hs-varid'>gtk_window_propagate_key_event</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2480"></a>
<a name="line-2481"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_default_size"</span>
<a name="line-2482"></a> <span class='hs-varid'>gtk_window_get_default_size</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2483"></a>
<a name="line-2484"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_position"</span>
<a name="line-2485"></a> <span class='hs-varid'>gtk_window_set_position</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2486"></a>
<a name="line-2487"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_transient_for"</span>
<a name="line-2488"></a> <span class='hs-varid'>gtk_window_set_transient_for</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2489"></a>
<a name="line-2490"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_transient_for"</span>
<a name="line-2491"></a> <span class='hs-varid'>gtk_window_get_transient_for</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2492"></a>
<a name="line-2493"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_destroy_with_parent"</span>
<a name="line-2494"></a> <span class='hs-varid'>gtk_window_set_destroy_with_parent</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2495"></a>
<a name="line-2496"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_destroy_with_parent"</span>
<a name="line-2497"></a> <span class='hs-varid'>gtk_window_get_destroy_with_parent</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2498"></a>
<a name="line-2499"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_is_active"</span>
<a name="line-2500"></a> <span class='hs-varid'>gtk_window_is_active</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2501"></a>
<a name="line-2502"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_has_toplevel_focus"</span>
<a name="line-2503"></a> <span class='hs-varid'>gtk_window_has_toplevel_focus</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2504"></a>
<a name="line-2505"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>unsafe</span> <span class='hs-str'>"gtk_window_list_toplevels"</span>
<a name="line-2506"></a> <span class='hs-varid'>gtk_window_list_toplevels</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2507"></a>
<a name="line-2508"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>unsafe</span> <span class='hs-str'>"gtk_window_get_focus"</span>
<a name="line-2509"></a> <span class='hs-varid'>gtk_window_get_focus</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2510"></a>
<a name="line-2511"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>unsafe</span> <span class='hs-str'>"gtk_window_set_focus"</span>
<a name="line-2512"></a> <span class='hs-varid'>gtk_window_set_focus</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2513"></a>
<a name="line-2514"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_default_widget"</span>
<a name="line-2515"></a> <span class='hs-varid'>gtk_window_get_default_widget</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2516"></a>
<a name="line-2517"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_present"</span>
<a name="line-2518"></a> <span class='hs-varid'>gtk_window_present</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2519"></a>
<a name="line-2520"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_deiconify"</span>
<a name="line-2521"></a> <span class='hs-varid'>gtk_window_deiconify</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2522"></a>
<a name="line-2523"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_iconify"</span>
<a name="line-2524"></a> <span class='hs-varid'>gtk_window_iconify</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2525"></a>
<a name="line-2526"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_maximize"</span>
<a name="line-2527"></a> <span class='hs-varid'>gtk_window_maximize</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2528"></a>
<a name="line-2529"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_unmaximize"</span>
<a name="line-2530"></a> <span class='hs-varid'>gtk_window_unmaximize</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2531"></a>
<a name="line-2532"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_fullscreen"</span>
<a name="line-2533"></a> <span class='hs-varid'>gtk_window_fullscreen</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2534"></a>
<a name="line-2535"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_unfullscreen"</span>
<a name="line-2536"></a> <span class='hs-varid'>gtk_window_unfullscreen</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2537"></a>
<a name="line-2538"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_keep_above"</span>
<a name="line-2539"></a> <span class='hs-varid'>gtk_window_set_keep_above</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2540"></a>
<a name="line-2541"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_keep_below"</span>
<a name="line-2542"></a> <span class='hs-varid'>gtk_window_set_keep_below</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2543"></a>
<a name="line-2544"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_skip_taskbar_hint"</span>
<a name="line-2545"></a> <span class='hs-varid'>gtk_window_set_skip_taskbar_hint</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2546"></a>
<a name="line-2547"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_skip_taskbar_hint"</span>
<a name="line-2548"></a> <span class='hs-varid'>gtk_window_get_skip_taskbar_hint</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2549"></a>
<a name="line-2550"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_skip_pager_hint"</span>
<a name="line-2551"></a> <span class='hs-varid'>gtk_window_set_skip_pager_hint</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2552"></a>
<a name="line-2553"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_skip_pager_hint"</span>
<a name="line-2554"></a> <span class='hs-varid'>gtk_window_get_skip_pager_hint</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2555"></a>
<a name="line-2556"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_accept_focus"</span>
<a name="line-2557"></a> <span class='hs-varid'>gtk_window_set_accept_focus</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2558"></a>
<a name="line-2559"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_accept_focus"</span>
<a name="line-2560"></a> <span class='hs-varid'>gtk_window_get_accept_focus</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2561"></a>
<a name="line-2562"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_focus_on_map"</span>
<a name="line-2563"></a> <span class='hs-varid'>gtk_window_set_focus_on_map</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2564"></a>
<a name="line-2565"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_focus_on_map"</span>
<a name="line-2566"></a> <span class='hs-varid'>gtk_window_get_focus_on_map</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2567"></a>
<a name="line-2568"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_startup_id"</span>
<a name="line-2569"></a> <span class='hs-varid'>gtk_window_set_startup_id</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2570"></a>
<a name="line-2571"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_decorated"</span>
<a name="line-2572"></a> <span class='hs-varid'>gtk_window_set_decorated</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2573"></a>
<a name="line-2574"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_decorated"</span>
<a name="line-2575"></a> <span class='hs-varid'>gtk_window_get_decorated</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2576"></a>
<a name="line-2577"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_deletable"</span>
<a name="line-2578"></a> <span class='hs-varid'>gtk_window_set_deletable</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2579"></a>
<a name="line-2580"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_deletable"</span>
<a name="line-2581"></a> <span class='hs-varid'>gtk_window_get_deletable</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2582"></a>
<a name="line-2583"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_frame_dimensions"</span>
<a name="line-2584"></a> <span class='hs-varid'>gtk_window_set_frame_dimensions</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2585"></a>
<a name="line-2586"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_frame_dimensions"</span>
<a name="line-2587"></a> <span class='hs-varid'>gtk_window_get_frame_dimensions</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2588"></a>
<a name="line-2589"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_has_frame"</span>
<a name="line-2590"></a> <span class='hs-varid'>gtk_window_set_has_frame</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2591"></a>
<a name="line-2592"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_has_frame"</span>
<a name="line-2593"></a> <span class='hs-varid'>gtk_window_get_has_frame</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2594"></a>
<a name="line-2595"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_role"</span>
<a name="line-2596"></a> <span class='hs-varid'>gtk_window_set_role</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2597"></a>
<a name="line-2598"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_role"</span>
<a name="line-2599"></a> <span class='hs-varid'>gtk_window_get_role</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2600"></a>
<a name="line-2601"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_stick"</span>
<a name="line-2602"></a> <span class='hs-varid'>gtk_window_stick</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2603"></a>
<a name="line-2604"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_unstick"</span>
<a name="line-2605"></a> <span class='hs-varid'>gtk_window_unstick</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2606"></a>
<a name="line-2607"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_add_accel_group"</span>
<a name="line-2608"></a> <span class='hs-varid'>gtk_window_add_accel_group</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>AccelGroup</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2609"></a>
<a name="line-2610"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_remove_accel_group"</span>
<a name="line-2611"></a> <span class='hs-varid'>gtk_window_remove_accel_group</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>AccelGroup</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2612"></a>
<a name="line-2613"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_icon"</span>
<a name="line-2614"></a> <span class='hs-varid'>gtk_window_set_icon</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Pixbuf</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2615"></a>
<a name="line-2616"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_icon"</span>
<a name="line-2617"></a> <span class='hs-varid'>gtk_window_get_icon</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Pixbuf</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2618"></a>
<a name="line-2619"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_icon_list"</span>
<a name="line-2620"></a> <span class='hs-varid'>gtk_window_set_icon_list</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2621"></a>
<a name="line-2622"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_icon_list"</span>
<a name="line-2623"></a> <span class='hs-varid'>gtk_window_get_icon_list</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2624"></a>
<a name="line-2625"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_default_icon_list"</span>
<a name="line-2626"></a> <span class='hs-varid'>gtk_window_set_default_icon_list</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2627"></a>
<a name="line-2628"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_default_icon_list"</span>
<a name="line-2629"></a> <span class='hs-varid'>gtk_window_get_default_icon_list</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2630"></a>
<a name="line-2631"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_icon_name"</span>
<a name="line-2632"></a> <span class='hs-varid'>gtk_window_set_icon_name</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2633"></a>
<a name="line-2634"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_icon_name"</span>
<a name="line-2635"></a> <span class='hs-varid'>gtk_window_get_icon_name</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2636"></a>
<a name="line-2637"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_default_icon_name"</span>
<a name="line-2638"></a> <span class='hs-varid'>gtk_window_set_default_icon_name</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2639"></a>
<a name="line-2640"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_default_icon"</span>
<a name="line-2641"></a> <span class='hs-varid'>gtk_window_set_default_icon</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Pixbuf</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2642"></a>
<a name="line-2643"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_default_icon_from_file"</span>
<a name="line-2644"></a> <span class='hs-varid'>gtk_window_set_default_icon_from_file</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2645"></a>
<a name="line-2646"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_default_icon_name"</span>
<a name="line-2647"></a> <span class='hs-varid'>gtk_window_get_default_icon_name</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2648"></a>
<a name="line-2649"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_screen"</span>
<a name="line-2650"></a> <span class='hs-varid'>gtk_window_set_screen</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Screen</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2651"></a>
<a name="line-2652"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_screen"</span>
<a name="line-2653"></a> <span class='hs-varid'>gtk_window_get_screen</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Screen</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2654"></a>
<a name="line-2655"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_icon_from_file"</span>
<a name="line-2656"></a> <span class='hs-varid'>gtk_window_set_icon_from_file</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2657"></a>
<a name="line-2658"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_auto_startup_notification"</span>
<a name="line-2659"></a> <span class='hs-varid'>gtk_window_set_auto_startup_notification</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2660"></a>
<a name="line-2661"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_gravity"</span>
<a name="line-2662"></a> <span class='hs-varid'>gtk_window_set_gravity</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2663"></a>
<a name="line-2664"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_gravity"</span>
<a name="line-2665"></a> <span class='hs-varid'>gtk_window_get_gravity</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2666"></a>
<a name="line-2667"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_move"</span>
<a name="line-2668"></a> <span class='hs-varid'>gtk_window_move</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2669"></a>
<a name="line-2670"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_parse_geometry"</span>
<a name="line-2671"></a> <span class='hs-varid'>gtk_window_parse_geometry</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CChar</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2672"></a>
<a name="line-2673"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_reshow_with_initial_size"</span>
<a name="line-2674"></a> <span class='hs-varid'>gtk_window_reshow_with_initial_size</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2675"></a>
<a name="line-2676"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_resize"</span>
<a name="line-2677"></a> <span class='hs-varid'>gtk_window_resize</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2678"></a>
<a name="line-2679"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_begin_resize_drag"</span>
<a name="line-2680"></a> <span class='hs-varid'>gtk_window_begin_resize_drag</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CUInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2681"></a>
<a name="line-2682"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_begin_move_drag"</span>
<a name="line-2683"></a> <span class='hs-varid'>gtk_window_begin_move_drag</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CUInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2684"></a>
<a name="line-2685"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_position"</span>
<a name="line-2686"></a> <span class='hs-varid'>gtk_window_get_position</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2687"></a>
<a name="line-2688"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_size"</span>
<a name="line-2689"></a> <span class='hs-varid'>gtk_window_get_size</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2690"></a>
<a name="line-2691"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_type_hint"</span>
<a name="line-2692"></a> <span class='hs-varid'>gtk_window_set_type_hint</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2693"></a>
<a name="line-2694"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_type_hint"</span>
<a name="line-2695"></a> <span class='hs-varid'>gtk_window_get_type_hint</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2696"></a>
<a name="line-2697"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_present_with_time"</span>
<a name="line-2698"></a> <span class='hs-varid'>gtk_window_present_with_time</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CUInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2699"></a>
<a name="line-2700"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_urgency_hint"</span>
<a name="line-2701"></a> <span class='hs-varid'>gtk_window_set_urgency_hint</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2702"></a>
<a name="line-2703"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_urgency_hint"</span>
<a name="line-2704"></a> <span class='hs-varid'>gtk_window_get_urgency_hint</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CInt</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2705"></a>
<a name="line-2706"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_geometry_hints"</span>
<a name="line-2707"></a> <span class='hs-varid'>gtk_window_set_geometry_hints</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Widget</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CInt</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2708"></a>
<a name="line-2709"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_set_opacity"</span>
<a name="line-2710"></a> <span class='hs-varid'>gtk_window_set_opacity</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>CDouble</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>()</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2711"></a>
<a name="line-2712"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_opacity"</span>
<a name="line-2713"></a> <span class='hs-varid'>gtk_window_get_opacity</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-conid'>CDouble</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2714"></a>
<a name="line-2715"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>safe</span> <span class='hs-str'>"gtk_window_get_group"</span>
<a name="line-2716"></a> <span class='hs-varid'>gtk_window_get_group</span> <span class='hs-keyglyph'>::</span> <span class='hs-layout'>(</span><span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>Window</span><span class='hs-layout'>)</span> <span class='hs-keyglyph'>-></span> <span class='hs-layout'>(</span><span class='hs-conid'>IO</span> <span class='hs-layout'>(</span><span class='hs-conid'>Ptr</span> <span class='hs-conid'>WindowGroup</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span><span class='hs-layout'>)</span>
<a name="line-2717"></a>
<a name="line-2718"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>unsafe</span> <span class='hs-str'>"gtk_window_type_get_type"</span>
<a name="line-2719"></a> <span class='hs-varid'>gtk_window_type_get_type</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>CUInt</span>
<a name="line-2720"></a>
<a name="line-2721"></a><span class='hs-keyword'>foreign</span> <span class='hs-keyword'>import</span> <span class='hs-keyword'>ccall</span> <span class='hs-keyword'>unsafe</span> <span class='hs-str'>"gtk_window_position_get_type"</span>
<a name="line-2722"></a> <span class='hs-varid'>gtk_window_position_get_type</span> <span class='hs-keyglyph'>::</span> <span class='hs-conid'>CUInt</span>
</pre></body>
</html>
distrib
>
Fedora
>
14
>
x86_64
>
media
>
updates
>
by-pkgid
>
677c1b5134368504c2e447757584d19e
>
files
>
1130
