              (vertical-scroll-bars . nil)
              (horizontal-scroll-bars . nil)
              (undecorated . t)
+             (unsplittable . t)
              )))
 
     ;; Configuration frame.

  ;; Delete frame first.
  (delete-frame snails-frame)
  (setq snails-frame nil)
  (setq snails-parent-frame nil)
  ;; Kill all subprocess and process buffers.
  (maphash
   (lambda (name process)


(defun snails-frame-is-active-p ()
  (and snails-frame
       (frame-live-p snails-frame)
       snails-frame-active-p
       (eq (window-frame (selected-window)) snails-frame)))

(defun snails-candidate-get-info ()
