mercurial/HGCommandParser.st
changeset 808 ae9fdbfa8ba4
parent 807 ef00a1303f73
child 859 d990a97b26a4
equal deleted inserted replaced
807:ef00a1303f73 808:ae9fdbfa8ba4
  1281     (errorMessage startsWith: 'unknown revision ''') ifTrue:[
  1281     (errorMessage startsWith: 'unknown revision ''') ifTrue:[
  1282         | rev err |
  1282         | rev err |
  1283 
  1283 
  1284         rev := HGChangesetId readFrom: (errorMessage readStream skip: 'unknown revision ''' size) onError:[ nil ].
  1284         rev := HGChangesetId readFrom: (errorMessage readStream skip: 'unknown revision ''' size) onError:[ nil ].
  1285         err := HGUnknownRevisionError newException
  1285         err := HGUnknownRevisionError newException
       
  1286                     parameter: rev;
       
  1287                     messageText: errorMessage; yourself.
       
  1288         self propagate: err.
       
  1289         ^ self.
       
  1290     ].
       
  1291     (errorMessage startsWith: 'hidden revision ''') ifTrue:[
       
  1292         | rev err |
       
  1293 
       
  1294         rev := HGChangesetId readFrom: (errorMessage readStream skip: 'hidden revision ''' size) onError:[ self error: 'Cannot parse changeset ID from error message!!' ].
       
  1295         err := HGObsoleteRevisionError newException
  1286                     parameter: rev;
  1296                     parameter: rev;
  1287                     messageText: errorMessage; yourself.
  1297                     messageText: errorMessage; yourself.
  1288         self propagate: err.
  1298         self propagate: err.
  1289         ^ self.
  1299         ^ self.
  1290     ].
  1300     ].