Return to rcsutil.c CVS log | Up to [local] / src / usr.bin / rcs |
version 1.27, 2007/02/22 08:30:45 | version 1.28, 2007/02/22 19:11:13 | ||
---|---|---|---|
|
|
||
xfree(av->argv); | xfree(av->argv); | ||
xfree(av); | xfree(av); | ||
} | } | ||
/* | |||
* Strip suffix from filename. | |||
*/ | |||
void | |||
rcs_strip_suffix(char *filename) | |||
{ | |||
char *p, *suffixes, *next, *ext; | |||
if ((p = strrchr(filename, ',')) != NULL) { | |||
suffixes = xstrdup(rcs_suffixes); | |||
for (next = suffixes; (ext = strsep(&next, "/")) != NULL;) { | |||
if (!strcmp(p, ext)) { | |||
*p = '\0'; | |||
break; | |||
} | |||
} | |||
xfree(suffixes); | |||
} | |||
} |