cpg bug fix #1

[sources-request at genrad.UUCP]

From: decvax!tektronix!reed!omen!caf

The strrchr call on line 129 should use '/' (as do the other strrchr
calls) rather than "/" as distributed.

OK, here it is in a form suitable for "patch"ing

*** cpg.orig	Mon Jun 17 10:59:25 1985
--- cpg.c	Mon Jun 17 10:59:37 1985
***************
*** 127,131
      extern int   optind;			/* option index					*/
  
!     if (pgm = strrchr (pgm, "/")) pgm++;	/* set program name		*/
      else pgm = pgm;
  

--- 127,131 -----
      extern int   optind;			/* option index					*/
  
!     if (pgm = strrchr (pgm, '/')) pgm++;	/* set program name		*/
      else pgm = pgm;