workgroups2 Files · src/workgroups-structs.el

Files @ ee27475b139d

Branch filter:

Location: workgroups2/src/workgroups-structs.el

ee27475b139d 1.3 KiB text/x-elisp Show Annotation Show as Raw Download as Raw

Sergey Pashinin

Save variables without a serialize function

If the only thing to do is to save some local variable you can use

(save . (var1 var2 ...))

instead of a serialize function

;;; workgroups-structs.el --- Data structures for WG
;;; Commentary:
;;
;; Copyright (C) Sergey Pashinin
;; Author: Sergey Pashinin <sergey@pashinin.com>
;;
;; `wg-defstruct'?
;;
;;; Code:

(require 'workgroups-utils-basic)

(wg-defstruct wg buf
  (uid (wg-generate-uid))
  (name)
  (file-name)
  (point)
  (mark)
  (local-vars)
  (special-data)
  ;; This may be used later:
  (gc))

(wg-defstruct wg win
  (uid)
  (parameters)
  (edges)
  (point)
  (start)
  (hscroll)
  (dedicated)
  (selected)
  (minibuffer-scroll)
  (buf-uid))

(wg-defstruct wg wtree
  (uid)
  (dir)
  (edges)
  (wlist))

(wg-defstruct wg wconfig
  (uid (wg-generate-uid))
  (name)
  (parameters)
  (left)
  (top)
  (width)
  (height)
  (vertical-scroll-bars)
  (scroll-bar-width)
  (wtree)
  ;;(fullscreen)
  )
;; wg-wconfig

(wg-defstruct wg workgroup
  (uid (wg-generate-uid))
  (name)
  (modified)
  (parameters)
  (base-wconfig)
  (selected-frame-wconfig)
  (saved-wconfigs)
  (strong-buf-uids)
  (weak-buf-uids))

(wg-defstruct wg session
  (uid (wg-generate-uid))
  (name)
  (modified)
  (parameters)
  (file-name)
  (version wg-version)
  (workgroup-list)
  (buf-list))

(wg-defstruct wg workgroup-state
  (undo-pointer)
  (undo-list))

(provide 'workgroups-structs)
;;; workgroups-structs.el ends here