--- mutt-1.5.20/hdrline.c-orig	2010-03-27 23:22:44.000000000 -0700
+++ mutt-1.5.20/hdrline.c	2010-03-27 23:23:43.000000000 -0700
@@ -219,6 +219,7 @@
  * %N = score
  * %O = like %L, except using address instead of name
  * %P = progress indicator for builtin pager
+ * %r = address of (first) `to:' recipient
  * %s = subject
  * %S = short message status (e.g., N/O/D/!/r/-)
  * %t = `to:' field (recipients)
@@ -548,6 +549,15 @@
       strfcpy(dest, NONULL(hfi->pager_progress), destlen);
       break;
 
+    case 'r':
+      if(hdr->env->to && hdr->env->to->mailbox)
+      {
+	mutt_format_s (dest, destlen, prefix, mutt_addr_for_display (hdr->env->to));
+      }
+      else
+        dest[0] = '\0';
+      break;
+
     case 's':
       
       if (flags & M_FORMAT_TREE && !hdr->collapsed)