[COMMIT] #'load-terminal-library; load term files correctly for gnuclient consoles.

[Aidan Kehoe]

APPROVE COMMIT

NOTE: This patch has been committed.

# HG changeset patch
# User Aidan Kehoe <kehoea at parhasard.net>
# Date 1318935816 -3600
# Node ID d469c668462e5b004a23418bd255949613be5608
# Parent  10f179710250e480c3dfaff0838480984d1a0edf
#'load-terminal-library; load term files correctly for gnuclient consoles.

lisp/ChangeLog addition:

2011-10-17  Aidan Kehoe  <kehoea at parhasard.net>

	* startup.el (load-terminal-library):
	Don't (getenv "TERM") here, call #'console-tty-terminal-type
	instead, different gnuclient consoles can and should have
	different terminal type function maps effective.

diff -r 10f179710250 -r d469c668462e lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Oct 09 12:55:51 2011 +0100
+++ b/lisp/ChangeLog	Tue Oct 18 12:03:36 2011 +0100
@@ -1,3 +1,10 @@
+2011-10-17  Aidan Kehoe  <kehoea at parhasard.net>
+
+	* startup.el (load-terminal-library):
+	Don't (getenv "TERM") here, call #'console-tty-terminal-type
+	instead, different gnuclient consoles can and should have
+	different terminal type function maps effective.
+
 2011-10-09  Aidan Kehoe  <kehoea at parhasard.net>
 
 	* obsolete.el:
diff -r 10f179710250 -r d469c668462e lisp/startup.el
--- a/lisp/startup.el	Sun Oct 09 12:55:51 2011 +0100
+++ b/lisp/startup.el	Tue Oct 18 12:03:36 2011 +0100
@@ -796,7 +796,7 @@
 
 (defun load-terminal-library ()
   (when term-file-prefix
-    (let ((term (getenv "TERM"))
+    (let ((term (console-tty-terminal-type))
 	  hyphend)
       (while (and term
 		  (not (load (concat term-file-prefix term) t t)))


-- 
‘Iodine deficiency was endemic in parts of the UK until, through what has been
described as “an unplanned and accidental public health triumph”, iodine was
added to cattle feed to improve milk production in the 1930s.’
(EN Pearce, Lancet, June 2011)