" File First created: 28 Nov 2004 17:15:08 EST " File Last MODIFIED: 28 Nov 2004 17:49:18 " Author: Soren Andersen funct! SplitReg(regname) let My_CLine = line('.') exe 'let My_Text = @' . a:regname let Init = 0 let Finger = 0 while (Finger = match(My_Text, ',', Init)) > 0 let Elem = strpart(My_Text, Init, Finger - Init) append( My_CLine++, Elem ) let Init = Finger + 1 endwh " append( My_CLine, strpart(My_Text, endfu