<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><htmlxmlns="http://www.w3.org/1999/xhtml"><head><metahttp-equiv="Content-Type"content="text/html; charset=UTF-8"/><title>HSFM.GUI.Gtk.Utils</title><linkhref="ocean.css"rel="stylesheet"type="text/css"title="Ocean"/><scriptsrc="haddock-util.js"type="text/javascript"></script><scriptsrc="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML"type="text/javascript"></script><scripttype="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();setSynopsis("mini_HSFM-GUI-Gtk-Utils.html");};
into the GTK+ data structures.</p></div></div><divclass="top"><pclass="src"><aid="v:getFirstItem"class="def">getFirstItem</a> :: <ahref="HSFM-GUI-Gtk-Data.html#t:MyView">MyView</a> -><ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/System-IO.html#t:IO">IO</a><ahref="HSFM-GUI-Gtk-Data.html#t:Item">Item</a><ahref="src/HSFM-GUI-Gtk-Utils.html#getFirstItem"class="link">Source</a><ahref="#v:getFirstItem"class="selflink">#</a></p><divclass="doc"><p>Currently unsafe. This is used to obtain any item, which will
fail if there is none.</p></div></div><divclass="top"><pclass="src"><aid="v:getCurrentDir"class="def">getCurrentDir</a> :: <ahref="HSFM-GUI-Gtk-Data.html#t:MyView">MyView</a> -><ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/System-IO.html#t:IO">IO</a><ahref="HSFM-GUI-Gtk-Data.html#t:Item">Item</a><ahref="src/HSFM-GUI-Gtk-Utils.html#getCurrentDir"class="link">Source</a><ahref="#v:getCurrentDir"class="selflink">#</a></p><divclass="doc"><p>Reads the current directory from MyView.</p><p>This reads the MVar and may block the main thread if it's
empty.</p></div></div><divclass="top"><pclass="src"><aid="v:pushStatusBar"class="def">pushStatusBar</a> :: <ahref="HSFM-GUI-Gtk-Data.html#t:MyGUI">MyGUI</a> -><ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/Data-String.html#t:String">String</a> -><ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/System-IO.html#t:IO">IO</a> (ContextId, MessageId) <ahref="src/HSFM-GUI-Gtk-Utils.html#pushStatusBar"class="link">Source</a><ahref="#v:pushStatusBar"class="selflink">#</a></p><divclass="doc"><p>Push a message to the status bar.</p></div></div><divclass="top"><pclass="src"><aid="v:popStatusbar"class="def">popStatusbar</a> :: <ahref="HSFM-GUI-Gtk-Data.html#t:MyGUI">MyGUI</a> -><ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/System-IO.html#t:IO">IO</a> () <ahref="src/HSFM-GUI-Gtk-Utils.html#popStatusbar"class="link">Source</a><ahref="#v:popStatusbar"class="selflink">#</a></p><divclass="doc"><p>Pop a message from the status bar.</p></div></div><divclass="top"><pclass="src"><aid="v:rawPathToIter"class="def">rawPathToIter</a> :: <ahref="HSFM-GUI-Gtk-Data.html#t:MyView">MyView</a> -> TreePath -><ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/System-IO.html#t:IO">IO</a> (<ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/Data-Maybe.html#t:Maybe">Maybe</a> TreeIter) <ahref="src/HSFM-GUI-Gtk-Utils.html#rawPathToIter"class="link">Source</a><ahref="#v:rawPathToIter"class="selflink">#</a></p><divclass="doc"><p>Turn a path on the rawModel into a path that we can
use at the outermost model layer.</p></div></div><divclass="top"><pclass="src"><aid="v:rawPathToItem"class="def">rawPathToItem</a> :: <ahref="HSFM-GUI-Gtk-Data.html#t:MyView">MyView</a> -> TreePath -><ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/System-IO.html#t:IO">IO</a> (<ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/Data-Maybe.html#t:Maybe">Maybe</a><ahref="HSFM-GUI-Gtk-Data.html#t:Item">Item</a>) <ahref="src/HSFM-GUI-Gtk-Utils.html#rawPathToItem"class="link">Source</a><ahref="#v:rawPathToItem"class="selflink">#</a></p><divclass="doc"><p>Turn a path on the rawModel into the corresponding item
that we can use at the outermost model layer.</p></div></div><divclass="top"><pclass="src"><aid="v:addHistory"class="def">addHistory</a> :: <ahref="https://hackage.haskell.org/package/base-4.9.0.0/docs/Data-Eq.html#t:Eq">Eq</a> a => a -> [a] -> [a] <ahref="src/HSFM-GUI-Gtk-Utils.html#addHistory"class="link">Source</a><ahref="#v:addHistory"class="selflink">#</a></p><divclass="doc"><p>Makes sure the list is max 5. This is probably not very efficient
but we don't care, since it's a small list anyway.</p></div></div></div></div><divid="footer"><p>Produced by <ahref="http://www.haskell.org/haddock/">Haddock</a> version 2.17.2</p></div></body></html>
