dictionary() does not support LIWC dictionaries where all terms only belong to one key

[adamobeng]

Loading this file fails with "Error in apply(catlist[, 2:ncol(catlist)], 2, as.integer) : dim(X) must have a positive length".

%
01  A category
02  Another category
%


more    01
lamb    01
little  01

had 02
mary    02

The problem comes from line 264 of dictionaries.R, which effectively assumes that there are more than two category columns.