comparison src/callproc.c @ 46600:736bbb2f8711

(init_callproc): Set up Vshared_game_score_directory. Set to nil if dir does not exist. (syms_of_callproc): Init unconditionally and simply.

46599:44651cb24a24

			     build_string (dir));
    }
  else
    Vtemp_file_name_pattern = build_string ("/tmp/emacsXXXXXX");
#endif
}

void
set_process_environment ()
{

  Vconfigure_info_directory = build_string (PATH_INFO);

  DEFVAR_LISP ("shared-game-score-directory", &Vshared_game_score_directory,
	       doc: /* Directory of score files for games which come with GNU Emacs.
If this variable is nil, then Emacs is unable to use a shared directory.  */);
#ifdef HAVE_SHARED_GAME_DIR
  Vshared_game_score_directory = build_string(HAVE_SHARED_GAME_DIR);
#else
  Vshared_game_score_directory = Qnil;
#endif

  DEFVAR_LISP ("temp-file-name-pattern", &Vtemp_file_name_pattern,
	       doc: /* Pattern for making names for temporary files.
This is used by `call-process-region'.  */);
  /* This variable is initialized in init_callproc.  */

46600:736bbb2f8711

			     build_string (dir));
    }
  else
    Vtemp_file_name_pattern = build_string ("/tmp/emacsXXXXXX");
#endif

  Vshared_game_score_directory = build_string (PATH_GAME);
  if (NILP (Ffile_directory_p (Vshared_game_score_directory)))
    Vshared_game_score_directory = Qnil;
}

void
set_process_environment ()
{

  Vconfigure_info_directory = build_string (PATH_INFO);

  DEFVAR_LISP ("shared-game-score-directory", &Vshared_game_score_directory,
	       doc: /* Directory of score files for games which come with GNU Emacs.
If this variable is nil, then Emacs is unable to use a shared directory.  */);
  Vshared_game_score_directory = build_string (PATH_GAME);

  DEFVAR_LISP ("temp-file-name-pattern", &Vtemp_file_name_pattern,
	       doc: /* Pattern for making names for temporary files.
This is used by `call-process-region'.  */);
  /* This variable is initialized in init_callproc.  */