- /*
- * If you have your lproc listed as "mhl",
- * then really invoked the mhlproc instead
- * (which is usually mhl anyway).
- */
- if (!strcmp (r1bindex (lproc, '/'), "mhl"))
- lproc = mhlproc;
+ /*
+ ** If you have your lproc listed as "mhl",
+ ** then really invoked the mhlproc instead
+ ** (which is usually mhl anyway).
+ */
+ if (!strcmp(mhbasename(lproc), "mhl"))
+ lproc = mhlproc;