История изменений
Исправление devsdc, (текущая версия) :
Его ещё явно надо видимым сделать, ЕМНИП.
import Graphics.UI.Gtk
myLabel = do
l <- pollingLabelNew "initial" 0.5 (return "widget")
widgetShowAll l
return l
Может, конечно, правильно делать как-то по-другому, но я в сорцах имеющихся в taffybar виджетов видел именно это.
Код не компилил, может не тайпчекаться.
Исходная версия devsdc, :
Его ещё явно надо видимым сделать, ЕМНИП.