[PATCH] run notmuch-hello-mode-hook at the end of the hello mode setup
Hi, looks like a similar patch has been applied as commit db352df09e92171293eacf159342cd950ae596d0. BR, Jani. On Mon, 8 Aug 2011 12:26:58 +0200, Antoine Beaupr? wrote: > i mostly use this to start offlineimap.el, but it could be used for > other purposes. i have not added hooks to other modes, but those could > be interesting as well. i am unsure as to how to make unit tests for > this. > --- > emacs/notmuch-hello.el |6 ++ > 1 files changed, 6 insertions(+), 0 deletions(-) > > diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el > index 65fde75..6389ac8 100644 > --- a/emacs/notmuch-hello.el > +++ b/emacs/notmuch-hello.el > @@ -118,6 +118,11 @@ Typically \",\" in the US and UK and \".\" in Europe." >:group 'notmuch >:type 'string) > > +(defcustom notmuch-hello-mode-hook nil > + "Hook run at the end of `notmuch-hello-mode'." > + :group 'notmuch > + :type 'hook) > + > (defvar notmuch-hello-url "http://notmuchmail.org; >"The `notmuch' web site.") > > @@ -336,6 +341,7 @@ Complete list of currently available key bindings: > (setq major-mode 'notmuch-hello-mode > mode-name "notmuch-hello") > ;;(setq buffer-read-only t) > + (run-mode-hooks 'notmuch-hello-mode 'notmuch-hello-mode-hook) > ) > > (defun notmuch-hello-generate-tag-alist () > -- > 1.7.2.5 > > ___ > notmuch mailing list > notmuch at notmuchmail.org > http://notmuchmail.org/mailman/listinfo/notmuch
Re: [PATCH] run notmuch-hello-mode-hook at the end of the hello mode setup
Hi, looks like a similar patch has been applied as commit db352df09e92171293eacf159342cd950ae596d0. BR, Jani. On Mon, 8 Aug 2011 12:26:58 +0200, Antoine Beaupré anar...@koumbit.org wrote: i mostly use this to start offlineimap.el, but it could be used for other purposes. i have not added hooks to other modes, but those could be interesting as well. i am unsure as to how to make unit tests for this. --- emacs/notmuch-hello.el |6 ++ 1 files changed, 6 insertions(+), 0 deletions(-) diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 65fde75..6389ac8 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -118,6 +118,11 @@ Typically \,\ in the US and UK and \.\ in Europe. :group 'notmuch :type 'string) +(defcustom notmuch-hello-mode-hook nil + Hook run at the end of `notmuch-hello-mode'. + :group 'notmuch + :type 'hook) + (defvar notmuch-hello-url http://notmuchmail.org; The `notmuch' web site.) @@ -336,6 +341,7 @@ Complete list of currently available key bindings: (setq major-mode 'notmuch-hello-mode mode-name notmuch-hello) ;;(setq buffer-read-only t) + (run-mode-hooks 'notmuch-hello-mode 'notmuch-hello-mode-hook) ) (defun notmuch-hello-generate-tag-alist () -- 1.7.2.5 ___ notmuch mailing list notmuch@notmuchmail.org http://notmuchmail.org/mailman/listinfo/notmuch ___ notmuch mailing list notmuch@notmuchmail.org http://notmuchmail.org/mailman/listinfo/notmuch
[PATCH] run notmuch-hello-mode-hook at the end of the hello mode setup
i mostly use this to start offlineimap.el, but it could be used for other purposes. i have not added hooks to other modes, but those could be interesting as well. i am unsure as to how to make unit tests for this. --- emacs/notmuch-hello.el |6 ++ 1 files changed, 6 insertions(+), 0 deletions(-) diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 65fde75..6389ac8 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -118,6 +118,11 @@ Typically \",\" in the US and UK and \".\" in Europe." :group 'notmuch :type 'string) +(defcustom notmuch-hello-mode-hook nil + "Hook run at the end of `notmuch-hello-mode'." + :group 'notmuch + :type 'hook) + (defvar notmuch-hello-url "http://notmuchmail.org; "The `notmuch' web site.") @@ -336,6 +341,7 @@ Complete list of currently available key bindings: (setq major-mode 'notmuch-hello-mode mode-name "notmuch-hello") ;;(setq buffer-read-only t) + (run-mode-hooks 'notmuch-hello-mode 'notmuch-hello-mode-hook) ) (defun notmuch-hello-generate-tag-alist () -- 1.7.2.5
[PATCH] run notmuch-hello-mode-hook at the end of the hello mode setup
i mostly use this to start offlineimap.el, but it could be used for other purposes. i have not added hooks to other modes, but those could be interesting as well. i am unsure as to how to make unit tests for this. --- emacs/notmuch-hello.el |6 ++ 1 files changed, 6 insertions(+), 0 deletions(-) diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index 65fde75..6389ac8 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -118,6 +118,11 @@ Typically \,\ in the US and UK and \.\ in Europe. :group 'notmuch :type 'string) +(defcustom notmuch-hello-mode-hook nil + Hook run at the end of `notmuch-hello-mode'. + :group 'notmuch + :type 'hook) + (defvar notmuch-hello-url http://notmuchmail.org; The `notmuch' web site.) @@ -336,6 +341,7 @@ Complete list of currently available key bindings: (setq major-mode 'notmuch-hello-mode mode-name notmuch-hello) ;;(setq buffer-read-only t) + (run-mode-hooks 'notmuch-hello-mode 'notmuch-hello-mode-hook) ) (defun notmuch-hello-generate-tag-alist () -- 1.7.2.5 ___ notmuch mailing list notmuch@notmuchmail.org http://notmuchmail.org/mailman/listinfo/notmuch