rem: } else if (strcmp(argv[i], "-t")==0) {
add: } else if (strcmp(argv[i], "-t")==0 || strcmp(argv[i], "--theme-options")==0) {
context: main(int argc, char **argv){    proplist_t prop, style, key, val;    char *path;    int i, theme_too=0;    int make_pack = 0;    char *style_file = NULL;    ProgName = argv[0];    if (argc>1) {	for (i=1; i<argc; i++) {	    if (strcmp(argv[i], "-p")==0) {		make_pack = 1;		theme_too = 1;	    } else if (strcmp(argv[i], "-t")==0) {                theme_too++;            } else if (argv[i][0] != '-') {                style_file = argv[i];            } else {                print_help();                exit(1);            }        }    }        if (make_pack && !style_file) {	printf("%s: you must supply a name for the theme pack\n", ProgName);	exit(1);    }    PLSetStringCmpHook(StringCompareHook);    path = defaultsPathForDomain("WindowMaker");    prop = PLGetProplistWithPath(path);    if (!prop) {	printf("%s:could not load WindowMaker configuration file \"%s\".\n", 	       ProgName, path);	exit(1);    }    free(path);    /* get global value */    path = globalDefaultsPathForDomain("WindowMaker");    val = PLGetProplistWithPath(path);    if (val) {	PLMergeDictionaries(val, prop);	PLRelease(prop);	prop = val;    }    style = PLMakeDictionaryFromEntries(NULL, NULL, NULL);    for (i=0; options[i]!=NULL; i++) {        key = PLMakeString(options[i]);        val = PLGetDictionaryEntry(prop, key);        if (val)            PLInsertDictionaryEntry(style, key, val);    }    val = PLGetDictionaryEntry(prop, PLMakeString("PixmapPath"));    if (val)    	PixmapPath = PLGetString(val);    if (theme_too) {        for (i=0; theme_options[i]!=NULL; i++) {            key = PLMakeString(theme_options[i]);            val = PLGetDictionaryEntry(prop, key);            if (val)                PLInsertDictionaryEntry(style, key, val);        }	    }    if (make_pack) {	char *path;	makeThemePack(style, style_file);	path = wmalloc(strlen(ThemePath)+32);	strcpy(path, ThemePath);	strcat(path, "/style");	PLSetFilename(style, PLMakeString(path));	PLSave(style, NO);    } else {	if (style_file) {	    val = PLMakeString(style_file);	    PLSetFilename(style, val);	    PLSave(style, NO);	} else {	    puts(PLGetDescriptionIndent(style, 0));	}    }    exit(0);}