From 633d67738197e3d62db8c3588a664fb91874ac1b Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Wed, 13 May 2009 17:15:40 +0000
Subject: [PATCH] mutt: search flags (/~)

Probably the most useful keys of all, as they are not explained on the
normal mutt help screen.

Link directly to /, as other leading chars aren't as interesting (nor
included).
---
 mutt.inc.pl | 49 ++++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 48 insertions(+), 1 deletion(-)

diff --git a/mutt.inc.pl b/mutt.inc.pl
index 426e417..969aeee 100644
--- a/mutt.inc.pl
+++ b/mutt.inc.pl
@@ -19,7 +19,7 @@ my @generic = qw(^l ! * / : ; < = > ? H L M Z [ ] j k n q t z);
 	'.' => ["list new mail"], # buffy-list #TODO
 	'|' => ["pipe to shell"], # pipe-message
 	'$' => ["save mailbox"], # sync-mailbox
-	'/' => ["search"], # search
+	'/' => ["search", 'mode/~'], # search
 	'#' => ["split up thread"], # break-thread
 	'&' => ["thread tagged"], # link-threads
 	'%' => ["toggle readonly"], # toggle-write
@@ -105,3 +105,50 @@ my @generic = qw(^l ! * / : ; < = > ? H L M Z [ ] j k n q t z);
 	'L' => ["screen bottom"], # bottom-page
 }, # general
 
+'/~' => {
+	desc => 'search flags (/~)',
+
+	A => ["all"],
+	b => ["msg body", 'X arg'],
+	B => ["whole msg", 'arg'],
+	c => ["cc address", 'arg'],
+	C => ["to or cc address", 'arg'],
+	d => ["date sent ran$sign{_}g$sign{_}e", 'arg'],
+	D => ["deleted"],
+	e => ["sender", 'arg'],
+	E => ["expired"],
+	f => ["from", 'arg'],
+	F => ["flagged"],
+	g => ["signed"],
+	G => ["encryp$sign{_}ted"],
+	h => ["header", 'arg'],
+	H => ["spam attr$sign{_}ib$sign{_}ute", 'arg'],
+	i => ["msg id", 'arg'],
+	k => ["pgp key"],
+	L => ["receiv$sign{_}d by", 'arg'],
+	l => ["mailing list"],
+	m => ["num$sign{_}ber ran$sign{_}g$sign{_}e", 'arg'],
+	n => ["score range", 'arg'],
+	N => ["new"],
+	O => ["old"],
+	p => ["to you"],
+	P => ["by you"],
+	Q => ["replies"],
+	r => ["receive date ran$sign{_}ge", 'arg'],
+	R => ["read"],
+	s => ["subject"],
+	S => ["super$sign{_}seded"],
+	t => ["to address", 'arg'],
+	T => ["tagged"],
+	u => ["subscr$sign{_}ibed list"],
+	U => ["unread"],
+	v => ["collapsed thread"],
+	V => ["verified"],
+	x => ["refer$sign{_}ence", 'arg'],
+	X => ["attach$sign{_}ments", 'arg'],
+	y => ["x-label", 'arg'],
+	z => ["size range", 'arg'],
+	'=' => ["dupli$sign{_}cate"],
+	'$' => ["unrefer$sign{_}enced"],
+	'(' => ["in thread", 'arg'],
+}, # search option
-- 
2.30.0