bilderset should be unified in dictionary as it is saved on mongo

[GaborioSensata]

Dict$options[Dict$type == "bilderset"] <- Dict$options[Dict$type == "bilderset"] %>% str_extract(".+?(?=//)")