The bundle to do this is attached, also pushed to lp:~bojan-bnikolic/dvc/dev
-- Bojan Nikolic || http://www.bnikolic.co.uk
# Bazaar merge directive format 2 (Bazaar 0.90) # revision_id: [email protected]\ # e70mdjoo3ffwgeai # target_branch: http://bzr.xsteve.at/dvc/ # testament_sha1: 723b1bc1e390514e71c2d8684597798e8b8b752f # timestamp: 2009-06-05 23:23:14 +0100 # source_branch: ../main/ # base_revision_id: [email protected] # # Begin patch === modified file 'lisp/bzr.el' --- lisp/bzr.el 2009-03-15 14:09:56 +0000 +++ lisp/bzr.el 2009-06-05 22:19:37 +0000 @@ -156,7 +156,11 @@ (defun bzr-push (&optional repo-path) "Run bzr push. When called with a prefix argument, add the --remember option" - (interactive (list (read-string (format "Push %sto bzr repository: " (if current-prefix-arg "--remember " ""))))) + (interactive (list (let ((push-branch (bzr-info-branchinfo "push"))) + (read-string (format "Push %sto bzr repository [%s]: " + (if current-prefix-arg "--remember " "") + push-branch) + )))) (when (string= repo-path "") (setq repo-path nil)) (dvc-run-dvc-async 'bzr (list "push" repo-path (when current-prefix-arg "--remember")) @@ -1033,11 +1037,26 @@ (setq new-nick (read-string (format "Change nick from '%s' to: " nick) nil nil nick))) (dvc-run-dvc-sync 'bzr (list "nick" new-nick))))) +;;;###autoload (defun bzr-info () "Run bzr info." (interactive) (dvc-run-dvc-display-as-info 'bzr '("info"))) +(defun bzr-parse-info-key (kname) + "Parse the output of bzr info buffer and return value kname" + (progn + (re-search-forward (concat"\\s-+ " kname " branch: \\([^\n]*\\)?$") nil 't) + (match-string-no-properties 1))) + +(defun bzr-info-branchinfo (kname) + (dvc-run-dvc-sync 'bzr (list "info") + :finished + (dvc-capturing-lambda (output error status arguments) + (with-current-buffer output + (beginning-of-buffer) + (bzr-parse-info-key kname))))) + (defun bzr-testament () "Run bzr testament." (interactive) # Begin bundle IyBCYXphYXIgcmV2aXNpb24gYnVuZGxlIHY0CiMKQlpoOTFBWSZTWcUIxLsAD89fgHgwX/v///Oj Sg+////wYBI9X0H23Pd14bNAoACgAAAJpNjM2w0SChNABoAWtTTCUUyaTSaHqbU/VHoj9IQMjEZG mgxAABhFT1DTT0T0anqGm1D1AYgAYQAZA0BocNNMjEYTTAQwCaYRgmJkNMjQ0AkKEJqCbZKTeRpl T0gDT9J6o9TQ0NDQ3qgeoCKRAI0aAmTJk1Gm0BGU02qNqPUAGmnqeoFShACAIACNTaRJ6aRoDQ0A NA0dJa8PF0ohwggwQmIpRjf9eaUYaN5s6+2j2wjlLUVNSPiA75iecaI4VD3zeRpHjP8VovyKaRZR /o3YmVRozyNehmfl7b/Nh7eXu2FNNc6HvIAvSBwPCRSDbyo3+W8vKUtzWyrfdywTMjKkirLaM6JJ abkXYyJMqkcxX6LRlkMkqVQybktRnBLfu3SM5lG2VbnA/w8voxORS/WvOPabgX80tXDqpoGtW7HD o5y7kyrxQLoFuDEZAG22xoaD3+5CL6ItZjSkQMbG/Gh2MKvs66U37oLfS+9vfz4IL7SVGiWFaGD0 UhCUlRYYYGO9TNpOmWnDbo1/qftIr6cTKJkKRSTxwB2WKXqx1z+aem+Z5SNKVzZVVkWHn9sMP8cs qYjhbC5W2tgPIxsbGxsbGwYMbGxhQ6brrADIiRZFGiIMa7Xkc1TYbs1qkdIMhY3KIcdLp5r1WBXt 2bV63clfQx+VEHIhFVAuAVwN2NNZU21gr1iV60K1ZlVzKFMagmAz1DrjIMkxhRYiySoFpAQRxUxM AgLCM0uaGyUEk68uXLly50devKR7SNZGxfUIrQUUPT9j119wy9IYLmZy4QbOB3xNpFGfY/B/V6A2 bV87/Vc6/Z+V9yKfTTfg4/w/drk+Z7I/MP/B3ocSgk5MhIYWGERyAPmveHsWiag7ws8u6g8xOPmN zjafN3psaRMol786JYhOoLVKcQmplmxOYtlsKlzY/kYp5Vuxx32YUlOE4o/IVDEjkFQuQTIA+YqE 5pBDAoQKB1oOv43yNtySSSSSSRuST06u++3Pj6fYkhU2Gky6VEeNuxPpQu7keHN3oGWFQj0cEf+o 1F02I5uCpGcuEuXrKv6G5F6+spEq9myveZCpuIWkqKlzmf6VFLeSMS8W9EaW4znSyMRJYS8T96/a MyKLqJCgmaOk4GZmiLKOUxqEaycaSktoit/NZcvc2EhWcV7Bkuk/jJiq5Ow2b2q9mXO/mssxC9i3 I+EfM3kXJ6o90eXVxqRf2cqLQVpBfkO7CjC/ES+VkdkFZwc+DpJVZkvkcpGRU1RdJzeMv4P9Fm6U TDe4suBea7Mt+a6+7ZVRE7FJGAZXDMFZWtZm3Xl65769jDo3E2k5I5L5Ko6N7AtKqacXFTENtLSi rVq+UUuym9HnpZXWfGO+UvmRelmjtZzFMRlvkMWDJ2quTk0at/Ne5MFzANVzM0feeCNJVGBVFUei L8/DNhaW2u5HGdIMbeqELp3iaOjCTQiyMma5GMnKa4IuRgYyydFl2CiJiRzXLhuLl6i6lKq4LSre bmgmUvTozd+yMHbcpZFUVwzXt6jOZszdgpiuFVuDArBiuDCSTiG9gsaNzgwYPHxyaM3L5R8SfxR9 Zpxxbm9ZxWNUVnZJtff2Lr+royaaidqtjxUm4m1xg7F6KyaKqYLmjF27YTB1zbmi67grZfO1G9gl npsjVjyZsG5xXJhfvb3FXCS5Ze8AtmsvclWOSjoswXSWYKzZ8yWdNlZiJhUZzqGteAmffO8uHVCG BURTbhexGNIpJQuIqb1/b583bq6tGs4TWSiL0bN6cHRxzEsukyWmjR3rmznrFFJMUpBe1XDNGV7V m1VYsS3fhJvURzZTAmLcvOe5svavZGBitMfpPl6vqvRxy1dGyzrIdG3d2LmDzGLqxx8HV2tGzqyX mr8ZPaVR48fDx0439nXelrFq5XPXoTlR2UHnqjBHSlVltM/a3bppj2ScNVZmjlraRNaImrNuXPiZ PHupYaMpiUmrLz8G2K7sYKOl91kdVeLi433Ti4SGbZ3Nb+1FMc2PR2KOxSg35uhyUXEoq/Crk+Ee UxcWSjQM259UeUlad3bwwKab6zkjLTC5GCJHrREtSkmCO+rHGXmRvaBlrhbDoojK93LIth2U1Rq6 te1RRxccW9k0iMCMVy9VyXODVuXqqOjuZsWhZRoTwR90e0m/KKMKE+3dbbfzSyOWy5CqhHYzcFGL qnbWRn1ZCauvSjBZuiaK+Mmfp7Y4Te0cemmwuUruRgkmLeudyzm5uCzKUdOqlmyjJ8TBHdPnPgnd RKryvDu0OrBU6eaqQutkx6ZVUVaK2aPLRn39+ytcVmOzaaTvb2q92qVYtmailHAWqnBKXtbltDHD N3yMYbbne7WhvO1RxXs3BgyYKLMX0k+kvPojeaI8UadXTnw66X88ZOiL78Vshi6ic2SoksZzrguk xuvzc190vXhadW4VlzuwNWDfrclblTGkURSMW58IuuvDTeo0e8XZqG3kYnM365uDV3rji1VYOKrq ucRojsWYsHVo3tmnSfqe2SbqGMhxCsPz5SLiMBWjUoUIYVqsvcp7HzkpCAZlIVX+KkAurJ1KQSEi CCoUkMnwUjo2whEMNNpsbQNpsqkDAogYLzge0TTQtqnyUmpUpJQoIYCtSSk1KFPWhBJ5BUJI5CaZ FCISEGB/xOtScpe+QwpE4z1eBP1t41x6D1xIDnA1AQIkk0BXflYbY222DGwM+f4DeZnWfCM0JBel tAIkYv2GD5fkqzfRk+6rm2erJ+DRVexL1HwrJHzmWGD3ioVFhadnYepQYF5LAqWsOHxqNypcq2D7 Py/GMVD060Hip7KbIQSEbgS06/SYqGIS7dfToBXgWf9mF9mJ5MulGapj2S7yezaGAjw0qzXEDibQ e1MihCKEIDiZAcTIDiZAcTInX4hGxbzEoH0mPUbHuq931fDOS5SZL1yqrJVeo80WdEufZgufczUa LKsVX3MG5kpPrweOTyavfsnU0dTztNK5TUXE1tcP9IJud26CIIh3EmRIkESTIDi6wokaYGqQ7hHq S5VSyGmO8DQBQdpyUOEj1/akLrhSnrV+UwhHokhbwerwej2f2ova6zNe8mjB5rnm+jkjNdz8q2ew wRm0ebZRzb3Jo0c1zpCRZv3+77JIevj0+yOriijRucHF1XKL16zsZ9ZZ+7g0ZqGsuNZo0Ygw8JKS jVY6ZhroU26nudiCbEeMWJkzsoitmW1udrlOOt79fk6vaq/HHFc7irxavRVgxVdbO94LOBHovXNm 9JL5Gi80ano75ImvfJjPi9Vs8/PFo+6OLk3P4e7Fc924JHVwNmwAwJFhM+S3LoUPq+A1rxuOWQTd jgr/h2m74TiXoBR7qShjXHqRP1nb2QEnhzuRxAZTgdyrPdyu5ftx8Nfhv0erZ4OLY9xRUs9GenXh 15c3PXldlzu54W1+7N+H4dXN8vRMm9m3lXKRxHKQ8kjy4xtRJ6SPIXySeLZ4tzO9O23cwDmwdv1W XL2HN0WYsJlMILOLsfbkk4fiwbPVmvW+EfkJ3L2dEn0gWqRPKXVb5k8HvTXyrRof2Hbz5op3qnHK IGSUE7UZIA9eRZyJ0mMj8WLlBtj23+To8XVCrDD2eDF7KBqswZMVx9FlGbF8fGa91Rmz0ZrM3gvg +WuujVmvZsMNl7g5SqRomGHwudJD7yz9EfZL0fvH5j2Ger6zrP1o9oPzYyRW/8SfCptUtKDGAby1 Na8nbQMIj5DJeC249T0OR9f1Us+2hv3nAiIIgIlCOoTkJxWZSKFjTRZpUF8mut1yga5TvOBrO1Aq UpJByY9yVShDPlE2ibXvRQKN6n4VG5UnxNIp91KhADexyE5AOm0U1Gr28lXK9Hq1PCXdJZ5wyX9L s0vapiUsUwwUhgUTOzu9EAcFMNDWfFS0oymYSkCuwTaCPXAlFweIngu4bRODl6OUQpyVFmJ4iYDU JW9arqNpB3ooF1Qkg0+4B+PY0CSE0ivk46AGMWtFAweQE3lVoUxBXZlZNHgplUlZRAqGZ4GtBxxR nNAyHNChMtq/NT3KZhS5TGjvEyBMS5TuUPIVCYeJ221KX3ROQOSDNW1VUKdK1MtTrFkoVCj9ZAL3 D0KF7+fMSnLYCdrkZM1AylKls1TGptQT7Kf0pIX++GnwiplI/A26yLlIFKREpAUNKZSCAgSLKhUN KCbhNgmA+Am87N2YviWV8lNSCe4TcigZtzXgjpEfpCiEpKdI0CpgEVqug1iPjEwQkffVfn+EUvnr A9Xo6ROlSvesAc1OanMVnW8RPxYoYIpx14SOQUBYZ4vUvFIUy+a0eRVlPnsfp4icnK+oniJxe5+D yCo7IhjPI1RMhAIOwSEZqvME3CoVGil6Qkduj0QKDYUPU2ArsTep+SkgOpSFQmge8SkvHispY72i MwLKWTTTJFL/OpstGFS2BTAC6YjnCFKKt36Vdv33T9LFJCkKUEqVTIXw1l/PmF6EmHOQ39qkCcVh 5bkk9bxxEpKSMX2zTY2Nr5ULIiSV3Sr6X06PuHkZ9WEKFW8plngLdlIl0sfojnIxkXpF45BpE/RH K+XKfilHfGtSwkjoALlKW0mBnwVJCnLHQ+UZrjoqDJrAtLut8uttWSNKJJjE4V4qRTSv6CeD5fvD Fwa1+aoulS7DbMp/EiXxacF2HQx/MmBtg+2ObszvQdAuxAIQB9BLlWq4lqxFkmfeI4rRk65inYDz fHAS/ARQ4KsTMHvzA9PNfYTUJlDSv1RhRsKuZoohGDcpMJqRvExMwoUhSh09YkhMpkhNJFC6SzjD z2kXCP/xdyRThQkMUIxLsA==
_______________________________________________ Dvc-dev mailing list [email protected] https://mail.gna.org/listinfo/dvc-dev
