view unixSoft/bin/apply-patchbomb @ 472:79110d94a0c2

hg: filter out display of remotenames that start with "/" I may want to filter out anything that contains a "/" since that'd be a URL instead of a path shortcut, but I'll do that later if it becomes obviously the right choice.
author Augie Fackler <raf@durin42.com>
date Fri, 01 Feb 2019 14:08:50 -0500
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())