summaryrefslogtreecommitdiff
path: root/src/gizmo/wasp-density.el
blob: 54a212519bd91f5889560569cd82b49a6d1ac54d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
;;; wasp-density --- The Density Initiative -*- lexical-binding: t; -*-
;;; Commentary:
;;; Code:

(defcustom w/density-buffer "*wasp-density*"
  "Name of buffer used to display The Density Initiative."
  :type '(string)
  :group 'wasp)

(define-derived-mode w/density-mode special-mode "The Density Initiative"
  "Major mode for displaying The Density Initiative."
  :group 'wasp)

(defun w/density-get-buffer ()
  "Return the \"friend\" buffer."
  (unless (get-buffer w/density-buffer)
    (with-current-buffer (get-buffer-create w/density-buffer)
      (w/density-mode)))
  (get-buffer w/density-buffer))

(provide 'wasp-density)
;;; wasp-density.el ends here