subrepo: append subrepo path to subrepo error messages This change appends the subrepo path to subrepo errors. That is, when there is an error performing an operation a subrepo, rather than displaying a message such as: pushing subrepo MYSUBREPO to PATH searching for changes abort: push creates new remote head HEADHASH! hint: did you forget to merge? use push -f to force mercurial will show: pushing subrepo MYSUBREPO to PATH searching for changes abort: push creates new remote head HEADHASH! (in subrepo MYSUBREPO) hint: did you forget to merge? use push -f to force The rationale for this change is that the current error messages make it hard for TortoiseHg (and similar tools) to tell the user which subrepo caused the push failure. The "(in subrepo MYSUBREPO)" message has been added to those subrepo methods were it made sense (by using a decorator). We avoid appending "(in subrepo XXX)" multiple times when subrepos are nexted by throwing a "SubrepoAbort" exception after the extra message is appended. The decorator will then "ignore" (i.e. just re-raise) the exception and never add the message again. A small drawback of this method is that part of the exception trace is lost when the exception is catched and re-raised by the annotatesubrepoerror decorator. Also, because the state() function already printed the subrepo path when it threw an error, that error has been changed to avoid duplicating the subrepo path in the error message. Note that I have also updated several subrepo related tests to reflect these changes.

     1

" $Id: CVSAnnotate.vim,v 1.5 2002/10/01 21:34:02 rhiestan Exp $

     2

" Vim syntax file

     3

" Language:	CVS annotate output

     4

" Maintainer:	Bob Hiestand <bob@hiestandfamily.org>

     5

" Last Change:	$Date: 2002/10/01 21:34:02 $

     6

" Remark:	Used by the cvscommand plugin.  Originally written by Mathieu

     7

" Clabaut

     8

if version < 600

     9

  syntax clear

    10

elseif exists("b:current_syntax")

    11

  finish

    12

endif

    13

    14

syn match cvsDate 	/\S\S\S \S\+ \d\+ \d\+:\d\+:\d\+ \d\+ [+-]\?\d\+/ contained

    15

syn match cvsName  	/^\s*\S\+ / 		contained nextgroup=cvsVer

    16

syn match cvsVer 	/\d\+ / 		contained nextgroup=cvsDate

    17

syn region cvsHead 	start="^" end=":" 	contains=cvsVer,cvsName,cvsDate

    18

    19

if !exists("did_cvsannotate_syntax_inits")

    20

let did_cvsannotate_syntax_inits = 1

    21

hi link cvsText 	String

    22

hi link cvsDate 	Comment

    23

hi link cvsName	Type

    24

hi link cvsVer	Statement

    25

endif

    26

    27

let b:current_syntax="CVSAnnotate"