Build Casual Mairix

[ultronozm]

I currently have the following in my init.el, which seems to be aligned with the aims of this package.

(use-package mairix
  :ensure nil
  :defer t
  :bind
  ("C-z m" . mairix-transient-menu)
  :config
  (defconst mairix-syntax-help-text
    "Mairix Search Syntax:

word          : match word in message body and major headers
t:word        : match word in To: header
c:word        : match word in Cc: header
f:word        : match word in From: header
a:word        : match word in To:, Cc: or From: headers (address)
s:word        : match word in Subject: header
b:word        : match word in message body
m:word        : match word in Message-ID: header
n:word        : match word in name of attachment
F:flags       : match message flags (s=seen,r=replied,f=flagged,-=negate)
p:substring   : match substring of path
d:start-end   : match date range
z:low-high    : match messages in size range

Advanced syntax:
bs:word       : match word in Subject: header or body
s:word1,word2 : match both words in Subject:
s:word1/word2 : match either word or both words in Subject:
s:~word       : match messages not containing word in Subject:
s:substring=  : match substring in any word in Subject:
s:^substring= : match left-anchored substring in any word in Subject:
s:substring=2 : match substring with <=2 errors in any word in Subject:"
    "Help text for mairix search syntax.")

  (defun mairix-display-syntax-help ()
    "Display mairix search syntax help in a buffer."
    (interactive)
    (with-help-window "*Mairix Syntax Help*"
      (princ mairix-syntax-help-text)))

  (require 'transient)
  (transient-define-prefix
    mairix-transient-menu ()
    "Mairix search commands."
    :info-manual "(mairix-el)Top"
    [["Search"
      ("RET" "Prompted search" mairix-search)
      ("f"   "Search by sender" mairix-search-from-this-article)
      ("t"   "Search thread" mairix-search-thread-this-article)]
     ["Widget search"
      ("w" "Widget search" mairix-widget-search)
      ("b" "Widget based on article" mairix-widget-search-based-on-article)]
     ["Saved searches"
      ("s" "Use saved search" mairix-use-saved-search)
      ("S" "Save last search" mairix-save-search)
      ("e" "Edit saved searches" mairix-edit-saved-searches)]]
    [:class transient-row
            ("u" "Update database" mairix-update-database)
            ("?" "Show syntax help" mairix-display-syntax-help)
            ("i" "Info docs" (lambda ()
                               (interactive)
                               (info "(mairix-el)")))]))

Please let me know if this would be suitable to polish and PR as "casual-mairix.el", or feel free to use it for inspiration, etc.

[kickingvegas]

@ultronozm Thanks much for using Casual and for the proposal to add Mairix support. This is a package that I’m not familiar with, nor know how common is its usage.

I appreciate your offer to make a PR. That said, I’ve made some guidelines on contribution which I’ve documented here.

Before going there, let’s have a video-conference to discuss next steps. For the purpose of scheduling across time zones, I’m located in San Francisco.

All my best -

Charles

[ultronozm]

Hi Charles, Sorry, I've been (and will continue to be) traveling a lot, and time has been short. Mairix seems to be the standard search recommendation for users of Emacs's simplest built-in mail reader, Rmail. I found it recommended in some of the old mailing list archives. I do plan to get back to you on this eventually and take you up on your video-conference offer. In the mean time, if you happen to feel the urge to use or incorporate my code, please feel free! Thanks, best, Paul