*** xvps.c.orig	Thu Dec 22 17:34:42 1994
--- xvps.c	Sat Apr 25 20:16:26 1998
***************
*** 1552,1558 ****
    sprintf(tmpname, "Sys$Scratch:xvpgXXXXXX");
  #endif
  
!   mktemp(tmpname);
    if (tmpname[0] == '\0') {   /* mktemp() blew up */
      sprintf(str,"LoadPS: Unable to create temporary filename???");
      ErrPopUp(str, "\nHow unlikely!");
--- 1552,1558 ----
    sprintf(tmpname, "Sys$Scratch:xvpgXXXXXX");
  #endif
  
!   close(mkstemp(tmpname));
    if (tmpname[0] == '\0') {   /* mktemp() blew up */
      sprintf(str,"LoadPS: Unable to create temporary filename???");
      ErrPopUp(str, "\nHow unlikely!");
