A very simple function to switch a bzr checkout to a different branch.
# Bazaar merge directive format 2 (Bazaar 0.90) # revision_id: [EMAIL PROTECTED] # target_branch: ../main/ # testament_sha1: a5a110052efc01543d7300b83f2c8d96a47823ec # timestamp: 2008-07-01 12:36:46 +0100 # base_revision_id: [EMAIL PROTECTED] # # Begin patch === modified file 'lisp/bzr.el' --- lisp/bzr.el 2008-05-20 06:53:50 +0000 +++ lisp/bzr.el 2008-07-01 11:32:32 +0000 @@ -1160,6 +1160,21 @@ ;(xgit-annotate-hide-revinfo) (toggle-read-only 1)) +(defun bzr-switch-checkout (target) + "Switch the checkout to the branch TARGET" + (interactive "sURL of the branch to switch to: ") + (dvc-run-dvc-sync 'bzr (list "switch" target) + :finished 'dvc-output-buffer-handler) + (dvc-revert-some-buffers) + (dvc-trace "Switched checkout to %s" target) + ) + +(defun bzr-switch-checkout-l (target) + "Switch the checkout to a local branch" + (interactive "DBranch to switch to: ") + (let ((target (expand-file-name target))) + (bzr-switch-checkout target)) + ) ;; provide 'bzr before running bzr-ignore-setup, because bzr-ignore-setup ;; loads a file and this triggers the loading of bzr.
# Begin bundle IyBCYXphYXIgcmV2aXNpb24gYnVuZGxlIHY0CiMKQlpoOTFBWSZTWW10nfoAAcbfgEAwU+P//3al HgC////wUARYJvSrrt2rlWu7XCSKNCMlP9Sm2KnmTKnjVP1T1NPUAHqBoeoBJRJ+o0MJoVP0k9Ta m0gA9Q00AAAJTRETKn5GRop+qeKNGnqBp6QA9qNEMg5gAJkwAJhMEwhgCMACSU2imnpop4qep+hE bSeUepvVGmQGJo0DSCIeq7DdCy6+ZqmNYJvLZ3VNsE0KmhPAFGL4x5t17FSKNKLkBvPrMR3vqPtE MkXrDslBrKcEkc8iiVWLmucowKctJVcZ5urhzlD9t3jQ+UP2/fZAV2nhBnsclPQQTNEDpsujDj6d uaTx05tHFcPQfIaN+2JAgEkOg9vSOwdSD2YFWvOola7o0n73w1o2DesaN2COPGMCELNqlgJ6E0rz KRKVdsUqynjPN7kVx76BasHziJQ5iyJBecsHVOlUJ07CdOIyKtBKEhz0kUVh4VZGwWArFPv5b6a3 C9xoaYPMxjEd2VNrKFYVhoMTEU3ExIWAfFMwiCyU1Z4llYnUzGsuCYwxU3wcnpWivkMWPdtryWRi QNFso0wIkZLZPn1xTi7uGhTQ3YxvH86Ksdi7U7uBYdSw1HQExqJmEB1ArnChRa0x5bS2EhMMtRCR YpFbuopp3CLHpluJxIwYaWBeJ2+VumkTf3mMVQ6nzHj8DpuxVwPpHKA2R0rgwuxjd5yJbu4YERnY y+hvzihylPEMx1xYmRynyUZc710dnfS1UrbSzU7go1yuUpDmsY2mYuY5eOZzehicS4gGfvuwV/7A sWhEbL6F0kFQl25pjpmWk5aajwS6+Y3ptae48JDqxyhM1+GPAIz+LE2Z+rjeafx5Po8izaIQkMlX qa9kKCqU0HBJoJjdBw7tK4ioesZdYyf2Ekdt50EbzkQ62l85Y26Lch2PlkNKmq+GTzmJKZij36TW XX4tqlDxmXvHJE5yYvUzkt2aciqIyfblBedodAdJosM0qFUgtdQ3WNYRMCswJkay03FKkDeeM4Hz w4csuDr3Chcc8dkaCqSz8cUBuC3EKOgdi5PXkvSBVb/URNp/HS1g5q+4WcY9C2PK8DTwA5D8oW+0 k+8CAoVmCWwMQJEG29sVSoB5NlQHR6CnujNve5Sdjq10MfnKXOuSULSLMqkmZMGNxW6UgaNRHqSf Ywy7O6PQ6wuFtSocrrPEe+pLgBvv01A7B00I8gohzoudi1iBV1YyXDP/O48eKYxCXS8Vto6dBXq4 sd0OgZc00GKA3FzFQuWgVurPuiyk0zJU5oawesJBJFbtPw3TgXB8TY1Z52BSavbLMJZqTamReQ0C qacjZeyKhVKpWxW6kTjQ0+xWBchO6jMOoFHsThs1DmIwEwTqMXHYmZVOPmf4V5vS6FKdouVgrRMy ViZA/kaEDN2i4WS+CZUybJPf5b4cJkMxH/F3JFOFCQbXSd+g
-- Bojan Nikolic || http://www.bnikolic.co.uk
_______________________________________________ Dvc-dev mailing list [email protected] https://mail.gna.org/listinfo/dvc-dev
