From: martin f. krafft <madduck@madduck.net>
Date: Wed, 21 May 2008 12:19:31 +0000 (+0200)
Subject: add ability to change message subjects
X-Git-Url: https://git.madduck.net/etc/mutt.git/commitdiff_plain/d215fb8c4bb24685149e374ced9ab2fa5c2fd21e?hp=bd32ebec018c0942ff148a53ba0848045696289d

add ability to change message subjects
---

diff --git a/.mutt/batch-subject-editor b/.mutt/batch-subject-editor
new file mode 100755
index 0000000..ad12bef
--- /dev/null
+++ b/.mutt/batch-subject-editor
@@ -0,0 +1,25 @@
+#!/bin/sh
+#
+# batch-subject-editor - helper script to change subject lines with mutt
+#
+# Based on an idea by David Champion <dgc at uchicago.edu>
+#
+# Copyright © 2008 martin f. krafft <madduck@madduck.net>
+# Released under the terms of the Artistic Licence 2.0
+#
+set -eu
+
+printf 'Enter new subject: ' >/dev/tty
+read subj </dev/tty
+
+if [ -z "${subj:-}" ]; then
+  echo No subject specified. >&2
+  exit 1
+fi
+
+RE_REPLY='(re([[(]?[[:digit:]]+[)]]?)?|aw|antwort):[[:space:]]*'
+RE_SUBJ_PREFIX="^Subject:[[:space:]]*(${RE_REPLY})?"
+RE_SUBJ='.*'
+EDITOR="sed -i -re \"s,(${RE_SUBJ_PREFIX})${RE_SUBJ},\\\1$subj,i\""
+
+printf "set editor='${EDITOR} %s'\n"
diff --git a/.mutt/keybindings b/.mutt/keybindings
index 35a1d59..758e971 100644
--- a/.mutt/keybindings
+++ b/.mutt/keybindings
@@ -46,6 +46,8 @@ macro index		F	'<limit>~L ' "search for correspondents"
 
 #TODO this is a hack until switch-profile does not readd headers.
 macro compose	e	':set my_editor="$editor"<enter>:set editor=sensible-editor<enter><edit-headers>:set editor="$my_editor"<enter>' "invoke normal editor to edit message"
-macro index,pager	e	':set my_editor="$editor"<enter>:set editor=sensible-editor<enter><edit>:set editor="$my_editor"<enter>' "invoke normal editor to edit message"
+macro index,pager	e	':set my_editor="$editor"<enter>:set editor=sensible-editor<enter><tag-prefix><edit>:set editor="$my_editor"<enter>' "invoke normal editor to edit message"
+
+macro index,pager	\ej	':set my_editor="$editor"<enter>:source "$my_confdir/batch-subject-editor|"<enter><tag-prefix><edit>:set editor="$my_editor"<enter>' "change message subject"
 
 # vim:sw=12:noet:sts=12:ts=12:ft=muttrc