view unixSoft/bin/apply-patchbomb @ 485:e4d4cd0d120e

zsh: start using mcfly for ^R history search This is a modified version of mcfly.zsh from upstream 422557e1ba48c33c5753262bd294bf3e92a40476. I then expect to install mcfly using cargo.
author Augie Fackler <raf@durin42.com>
date Tue, 30 Jun 2020 10:37:13 -0400
parents 0b8457903012
children 6cc5a0550281
line wrap: on
line source

#!/usr/bin/python
# shebang for system python explicitly so we're sure to have pyobjc and
# the scripting bridge.
"""apply-patchbomb: apply selected messages in Mail.app to an hg repo in pwd.

This uses the scripting bridge to talk to Mail and subprocess to pass the
patch to Mercurial on stdin.
"""
import email
import subprocess
import sys

import ScriptingBridge

def main():
    mail = ScriptingBridge.SBApplication.applicationWithBundleIdentifier_(
        'com.apple.Mail')
    messages = list(sorted(mail.selection(),
                           cmp=lambda x,y: cmp(x.subject(), y.subject())))
    for m in messages:
        print 'Applying', m.subject()
        p = subprocess.Popen(['hg', 'import', '--obsolete', '-'], stdin=subprocess.PIPE)
        p.stdin.write(m.source())
        p.stdin.close()
        if p.wait() != 0:
            print 'hg import failed, bailing'
            return 2
    return 0

if __name__ == '__main__':
    sys.exit(main())