;+
; NAME:
;	plotbars_collect
; PURPOSE:
;	(internal use by plotbar only)
; CATEGORY:
;	ucsd/gen/idl/toolbox/graphics
; CALLING SEQUENCE:
	PRO plotbars_collect, rr_all, rr
; INPUTS:
;	rr_all[2,n]
;	rr[2,m]
; OUTPUTS:
;	rr_all[2,k]
; INCLUDE:
	@compile_opt.pro		; On error, return to caller
; CALLS:
;	boost
; PROCEDURE:
; MODIFICATION HISTORY:
;	MAY-2012, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
;-

; Remove duplicate point at the start of the bar

IF rr[0,2] EQ rr[0,3] AND rr[1,2] EQ rr[1,3] THEN rr = rr[*,0:2]
IF rr[0,0] EQ rr[0,1] AND rr[1,0] EQ rr[1,1] THEN rr = rr[*,1:*]

n = n_elements(rr_all)/2
IF n NE 0 THEN IF rr_all[0,n-1] EQ rr[0,0] AND rr_all[1,n-1] EQ rr[1,0] THEN rr = rr[*,1:*]

; Collect all the points

boost, rr_all, rr, pushdim=1

RETURN  &  END