#ifdef LOCALE
setlocale(LC_ALL, "");
#endif
- invo_name = r1bindex(argv[0], '/');
+ invo_name = mhbasename(argv[0]);
/* read user profile/context */
context_read();
}
if (!folder)
- folder = getfolder(1);
+ folder = getfolder(FCUR);
maildir = m_maildir(folder);
if (chdir(maildir) == NOTOK)
** then add "-show" option. Add "-file" if showing
** file.
*/
- if (strcmp(r1bindex(proc, '/'), "mhn") == 0) {
+ if (strcmp(mhbasename(proc), "mhn") == 0) {
if (file) {
vec[vecp] = vec[vecp - 1];
vec[vecp - 1] = "-file";
}
/* If the "proc" is "mhshow", add "-file" if showing file. */
- if (strcmp(r1bindex(proc, '/'), "mhshow") == 0 && file ) {
+ if (strcmp(mhbasename(proc), "mhshow") == 0 && file ) {
vec[vecp] = vec[vecp - 1];
vec[vecp - 1] = "-file";
vec[++vecp] = NULL;
** If "proc" is mhl, then run it internally
** rather than exec'ing it.
*/
- if (strcmp(r1bindex(proc, '/'), "mhl") == 0) {
+ if (strcmp(mhbasename(proc), "mhl") == 0) {
vec[0] = "mhl";
mhl(vecp, vec);
done(0);
** add the path to the message names. Currently, we are just
** checking for mhn here, since we've already taken care of mhl.
*/
- if (!strcmp(r1bindex(proc, '/'), "mhl")
+ if (!strcmp(mhbasename(proc), "mhl")
&& !file
&& chdir(maildir =
concat(m_maildir(""), "/", NULL)) != NOTOK) {
mp->foldpath = concat(mp->foldpath, "/", NULL);
- cp = ssequal(maildir, mp->foldpath)
+ cp = isprefix(maildir, mp->foldpath)
? mp->foldpath + strlen(maildir)
: mp->foldpath;
for (msgnum = procp; msgnum < vecp; msgnum++)
vec[msgnum] = concat(cp, vec[msgnum], NULL);
}
- vec[0] = r1bindex(proc, '/');
+ vec[0] = mhbasename(proc);
execvp(proc, vec);
adios(proc, "unable to exec");
return 0; /* dead code to satisfy the compiler */