aboutsummaryrefslogtreecommitdiffhomepage
path: root/notmuch.el
diff options
context:
space:
mode:
authorGravatar Carl Worth <cworth@cworth.org>2009-11-04 15:45:33 -0800
committerGravatar Carl Worth <cworth@cworth.org>2009-11-04 15:45:33 -0800
commit9f668b3d56baed92937180622462b7e1cca6b001 (patch)
tree7381ae6aee8f6e6fad2b70c07dd516ad9e3a97cf /notmuch.el
parent97b5f8153399d57bb9db643e778b06e23387110c (diff)
notmuch.el: Don't use defvar for undocumented variables.
Make at least some attempt to distinguish internal variables from those that the user is expected to fiddle with.
Diffstat (limited to 'notmuch.el')
-rw-r--r--notmuch.el28
1 files changed, 14 insertions, 14 deletions
diff --git a/notmuch.el b/notmuch.el
index 20436f83..7459d786 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -49,20 +49,20 @@
(defvar notmuch-show-signature-lines-max 6
"Maximum length of signature that will be hidden by default.")
-(defvar notmuch-show-message-begin-regexp " message{")
-(defvar notmuch-show-message-end-regexp " message}")
-(defvar notmuch-show-header-begin-regexp " header{")
-(defvar notmuch-show-header-end-regexp " header}")
-(defvar notmuch-show-body-begin-regexp " body{")
-(defvar notmuch-show-body-end-regexp " body}")
-(defvar notmuch-show-attachment-begin-regexp " attachment{")
-(defvar notmuch-show-attachment-end-regexp " attachment}")
-(defvar notmuch-show-part-begin-regexp " part{")
-(defvar notmuch-show-part-end-regexp " part}")
-(defvar notmuch-show-marker-regexp " \\(message\\|header\\|body\\|attachment\\|part\\)[{}].*$")
-
-(defvar notmuch-show-id-regexp "ID: \\(.*\\)$")
-(defvar notmuch-show-tags-regexp "(\\([^)]*\\))$")
+(set 'notmuch-show-message-begin-regexp " message{")
+(set 'notmuch-show-message-end-regexp " message}")
+(set 'notmuch-show-header-begin-regexp " header{")
+(set 'notmuch-show-header-end-regexp " header}")
+(set 'notmuch-show-body-begin-regexp " body{")
+(set 'notmuch-show-body-end-regexp " body}")
+(set 'notmuch-show-attachment-begin-regexp " attachment{")
+(set 'notmuch-show-attachment-end-regexp " attachment}")
+(set 'notmuch-show-part-begin-regexp " part{")
+(set 'notmuch-show-part-end-regexp " part}")
+(set 'notmuch-show-marker-regexp " \\(message\\|header\\|body\\|attachment\\|part\\)[{}].*$")
+
+(set 'notmuch-show-id-regexp "ID: \\(.*\\)$")
+(set 'notmuch-show-tags-regexp "(\\([^)]*\\))$")
; XXX: This should be a generic function in emacs somewhere, not here
(defun point-invisible-p ()