diff options
| author | psg <> | 2007-08-30 12:27:24 +0000 |
|---|---|---|
| committer | psg <> | 2007-08-30 12:27:24 +0000 |
| commit | 93437e8017f949b36ef8a487d7051aea4f366f6b (patch) | |
| tree | 4e834d714f04cec49f2265beef90f1431304448d | |
| parent | 89d0f5d7c4e6f72d3b7b76e3d6bc6ff0c3fa6a99 (diff) | |
debian-bts-control.el: debian-bts-control suffers of bug #336466 and
doesn't skip over mml directives. Thanks to Luca Capello (Closes: #392132).
| -rw-r--r-- | debian-bts-control.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/debian-bts-control.el b/debian-bts-control.el index 5a58b9b..f667ccc 100644 --- a/debian-bts-control.el +++ b/debian-bts-control.el @@ -58,7 +58,8 @@ ;; set `number-default'. ;; V1.08 08Aug2007 Peter S Galbraith <psg@debian.org> ;; - Use `C-c C-b' instead of `C-c c' (Closes: #435247). - +;; V1.09 30Aug2007 Peter S Galbraith <psg@debian.org> +;; - skip over mml directives (Closes: #392132) ;;; Code: (eval-when-compile '(require 'cl)) @@ -296,6 +297,8 @@ in `debian-bts-control-modes-to-reuse'." (setq number-default (match-string 1))) (goto-char (mail-header-end)) (forward-line 1) + (if (looking-at "^<#secure") ;Skip over mml directives + (forward-line 1)) (insert "thanks\n\n") (debian-bts-control-minor-mode 1)) ((not debian-bts-control-minor-mode) @@ -317,6 +320,8 @@ in `debian-bts-control-modes-to-reuse'." (debian-bug--set-CC debian-bug-From-address "cc:")) (goto-char (mail-header-end)) (forward-line 1) + (if (looking-at "^<#secure") ;Skip over mml directives + (forward-line 1)) (insert "thanks\n") (debian-bts-control-minor-mode 1))) (goto-char (mail-header-end)) |