(switch-to-buffer-other-frame  . other-frame)

    (kill-buffer                   . kill)

    (insert-buffer                 . insert)

    (display-buffer                . display))

  "Alist mapping buffer commands to ido buffer methods.")

(defvar wg-buffer-internal-default-buffer nil

  "Bound to `wg-buffer-internal's optional DEFAULT argument for

use by buffer list filtration hooks.")

(defvar wg-temp-buffer-list nil

  "Dynamically bound to the filtered buffer list in

`wg-finalize-buffer-list'.  Functions in

`wg-buffer-list-finalization-hook' should modify this variable.")

;; wconfig restoration

(defvar wg-window-min-width 2

  "Bound to `window-min-width' when restoring wtrees. ")

(defvar wg-window-min-height 1

  "Bound to `window-min-height' when restoring wtrees.")

(defvar wg-window-min-pad 2

  "Added to `wg-window-min-foo' to produce the actual minimum window size.")

(defvar wg-actual-min-width (+ wg-window-min-width wg-window-min-pad)

  "Actual minimum window width when creating windows.")

(defvar wg-actual-min-height (+ wg-window-min-height wg-window-min-pad)

  "Actual minimum window height when creating windows.")

(defvar wg-min-edges `(0 0 ,wg-actual-min-width ,wg-actual-min-height)

  "Smallest allowable edge list of windows created by Workgroups.")

(defvar wg-null-edges '(0 0 0 0)

  "Null edge list.")

(defvar wg-window-tree-selected-window nil

  "Used during wconfig restoration to hold the selected window.")

(defvar wg-update-current-workgroup-working-wconfig-on-select-frame t

  "Non-nil means update `selected-frame's current workgroup's

working wconfig before `select-frame' selects a new frame.

let-bind this to nil around forms in which you don't want this to

happen.")

(provide 'workgroups-variables)

;;; workgroups-variables.el ends here