         strength      (int (rp/get-player-attribute game-state :strength))
         dexterity     (rp/get-player-attribute game-state :dexterity)
         toughness     (rp/get-player-attribute game-state :toughness)]
-    (zc/csx [zcui/Popup {:style {:top 5}} [
+    (zc/csx [zcui/Popup {:style {:top -5}} [
         [:text {} [(format "Name:      %s" player-name)]]
         [:text {} [(format "Level:     %d (%d/%d)" level xp xp-next-level)]]
         [:text {} [""]]

                                                                            :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)

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