diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-05 11:23:30 -0200 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-01-05 11:23:44 -0200 |
| commit | f77495881d218a96a8b875e650a0d8acf0f36354 (patch) | |
| tree | c1e9eb8cf6879a90910c56f988f7b74db73376f6 /sx-compose.el | |
| parent | 34ea6829153a1b5b45104c0650a9d0a148491aef (diff) | |
Bind sx-compose-insert-tags to "\C-c\C-q"
Fix #137
Diffstat (limited to 'sx-compose.el')
| -rw-r--r-- | sx-compose.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/sx-compose.el b/sx-compose.el index e1f6874..ee4f774 100644 --- a/sx-compose.el +++ b/sx-compose.el @@ -107,6 +107,9 @@ with the `sx-compose-create' function. (define-key sx-compose-mode-map "\C-c\C-c" #'sx-compose-send) (define-key sx-compose-mode-map "\C-c\C-k" #'sx-compose-quit) +(sx--define-conditional-key + sx-compose-mode-map "\C-c\C-q" #'sx-compose-insert-tags + (ignore-errors (string= "Title: " (substring (buffer-string) 0 7)))) (defun sx-compose-send () "Finish composing current buffer and send it. |