From: Colin Walters <walters@gnu.org>
Date: Wed, 10 Apr 2002 19:15:51 +0000 (+0000)
Subject: (Vgame_score_directory): New variable.
X-Git-Tag: ttn-vms-21-2-B4~15703
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b065672a3328f00ced98a056bd321560c520fe6e;p=emacs.git

(Vgame_score_directory): New variable.
(syms_of_callproc) <Vgame_score_directory>: DEFVAR_LISP.
---

diff --git a/src/callproc.c b/src/callproc.c
index 56f8efb4ce7..92e6e479eaf 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -105,7 +105,7 @@ extern char **environ;
 
 Lisp_Object Vexec_path, Vexec_directory, Vexec_suffixes;
 Lisp_Object Vdata_directory, Vdoc_directory;
-Lisp_Object Vconfigure_info_directory;
+Lisp_Object Vconfigure_info_directory, Vgame_score_directory;
 Lisp_Object Vtemp_file_name_pattern;
 
 Lisp_Object Vshell_file_name;
@@ -1626,6 +1626,15 @@ Emacs's info files; the default value for Info-default-directory-list
 includes this.  */);
   Vconfigure_info_directory = build_string (PATH_INFO);
 
+  DEFVAR_LISP ("game-score-directory", &Vgame_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
+  Vgame_score_directory = build_string(HAVE_SHARED_GAME_DIR);
+#else
+  Vgame_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'.  */);