initial programme content type (re #377)
a little cleanup