view.xyz incorrect coloring

[Lars Skjærven]

shouldn't it color 100 residues red, and the last 29 green?

pdb = read.pdb("1hel")
pdb = trim(pdb, "calpha")

col <- c(rep(2, 100), rep(3, 29))
view(pdb$xyz, col=col, type=2)

[Barry Grant]

Fixed and no longer need type arg...

view(pdb, col=col)