From: Glenn Morris <rgm@gnu.org>
Date: Thu, 24 May 2012 07:53:21 +0000 (-0700)
Subject: * lisp/paths.el (term-file-prefix): Move to lisp/faces.el (the only user).
X-Git-Tag: emacs-24.2.90~471^2~6^2~110^2~10
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f18b81e6d670ea83e3ccb7c7b6aff50933120018;p=emacs.git

* lisp/paths.el (term-file-prefix): Move to lisp/faces.el (the only user).
* faces.el (term-file-prefix): Move here, make it a defcustom.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1b3b9f9e07d..8e9b88a6016 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2012-05-24  Glenn Morris  <rgm@gnu.org>
 
+	* paths.el (term-file-prefix): Move to faces.el (the only user).
+	* faces.el (term-file-prefix): Move here, make it a defcustom.
+
 	* paths.el (news-directory, news-path, news-inews-program):
 	Move to gnus/nnspool.el.
 
diff --git a/lisp/faces.el b/lisp/faces.el
index b3b0fa9b7d2..d96f3af0ac0 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -28,6 +28,16 @@
 (eval-when-compile
   (require 'cl))
 
+(defcustom term-file-prefix (purecopy "term/")
+  "If non-nil, Emacs startup performs terminal-specific initialization.
+It does this by: (load (concat term-file-prefix (getenv \"TERM\")))
+
+You may set this variable to nil in your init file if you do not wish
+the terminal-initialization file to be loaded."
+  :type '(choice (const :tag "No terminal-specific initialization" nil)
+		 (string :tag "Name of directory with term files"))
+  :group 'terminals)
+
 (declare-function xw-defined-colors "term/common-win" (&optional frame))
 
 (defvar help-xref-stack-item)
diff --git a/lisp/paths.el b/lisp/paths.el
index 5269933d245..f44a0e660fc 100644
--- a/lisp/paths.el
+++ b/lisp/paths.el
@@ -127,9 +127,4 @@ the environment variable INFOPATH is set.")
   :group 'environment
   :type 'file)
 
-(defvar term-file-prefix (purecopy "term/") "\
-If non-nil, Emacs startup does (load (concat term-file-prefix (getenv \"TERM\")))
-You may set this variable to nil in your `.emacs' file if you do not wish
-the terminal-initialization file to be loaded.")
-
 ;;; paths.el ends here