anchor.diff:      (on-play)))
   
   (defun play-selected ()
  +  ;; TODO: check if selected item is playable (playlist-get with 'is-track)
     (setq current-id (playlist-get current-playlist current-index 'id))
     (playback-set-file (playlist-get current-playlist current-index 'path))
     (slider-range 'sl-seek 0.0 (playback-length)) ;; TODO: DRY
  
positive.code: 
  (defun none ()
    (g-fill-all |0.2 0.2 0.2 1.0|))
  
  (defun create-buttons ()
    (create-layout 'l-btns t)
  
negative.code: 
  (defun create-desc-info ()
    (create-layout 'l-desc-info nil)
    (create-panel 'pan 'draw-info-panel)
    (create-text-button 'bb ">" "Test")
    (layout-add-component 'l-desc-info 'pan -0.1 -1.0 -1.0)
    (layout-add-component 'l-desc-info (create-buttons) 20.0 20.0 20.0)
  