         log-color        (rcolor/darken-rgb (rcolor/color->rgb (get message :color)) darken-factor)]
     (zc/csx
         [:view {} [
-          [:text {:style {:position :fixed :top -4 :left 0}} [
+          [:text {:style {:position :fixed :top 1 :left 0}} [
             (if msg-above?
               (zc/csx [:text {} [
                         [Highlight {} ["/"]]

                    first)
        r (mod (int (/ (System/currentTimeMillis) 4000)) (count values))
        n (first (nth values r))]
    (log/info r)
    (log/info n)
    (reset! tidbit-index n)
    (async/<! (async/timeout (rand-nth [1200 600])))
    (recur (update tidbit-freqs n inc))))

                                                                            :gray))
                                                :background-color (rcolor/color->rgb :white)}} [
                                  [Highlight {} [(str (or (item :hotkey)
                                                          "space"))]]
                                  [:text {} [(format "%c%s%s %s %s"
                                               (if-let [hotkey (get item :hotkey)]
                                                 (if (contains? (set selected-hotkeys) hotkey)
