Add custom group

By using `defgroup' and `defcustom' the variable (and possible later
variables) can be changed through Emacs' extensive customization
interface.

    M-x customize-group <RET> dispass <RET>

Will show you the variables that can be changed for dispass.el.
This commit is contained in:
Tom Willemsen 2012-06-17 22:38:43 +02:00
parent d547d846c6
commit 933febfeaa
2 changed files with 28 additions and 3 deletions

View file

@ -43,6 +43,13 @@ file, for example::
*Or* if you have package.el you could use `package-install-file`. *Or* if you have package.el you could use `package-install-file`.
Customization
==============================================================================
`dispass.el` only offers customization of the `dispass-executable`
variable for the moment. This is the location where the dispass
executable is located.
Usage Usage
============================================================================== ==============================================================================

View file

@ -41,6 +41,12 @@
;; _Or_ if you have package.el you could use `package-install-file'. ;; _Or_ if you have package.el you could use `package-install-file'.
;;; Customization:
;; dispass.el only offers customization of the `dispass-executable'
;; variable for the moment. This is the location where the dispass
;; executable is located.
;;; Usage: ;;; Usage:
;; Using dispass.el is simple, once installed. Either call `dispass' ;; Using dispass.el is simple, once installed. Either call `dispass'
@ -77,11 +83,23 @@
;; numeric prefix argument. ;; numeric prefix argument.
;; - Add `dispass-executable' which holds the location of the ;; - Add `dispass-executable' which holds the location of the
;; dispass executable script. ;; dispass executable script. It can be changed through the
;; emacs customization interface.
;; - Add a customization group named dispass, it is found
;; under the "External" group.
;;; Code: ;;; Code:
(defvar dispass-executable "dispass" (defgroup dispass nil
"The location of the dispass executable") "Customization options for the DisPass wrapper."
:group 'external)
(defcustom dispass-executable "dispass"
"The location of the dispass executable."
:package-version '(dispass . "0.1a7.3")
:group 'dispass
:type '(string)
:risky t)
(defun dispass-process-sentinel (proc status) (defun dispass-process-sentinel (proc status)
"Report PROC's status change to STATUS." "Report PROC's status change to STATUS."