aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c28
1 files changed, 14 insertions, 14 deletions
diff --git a/src/data.c b/src/data.c
index bd08368c2fb..0b2036395da 100644
--- a/src/data.c
+++ b/src/data.c
@@ -1900,41 +1900,41 @@ If the current binding is global (the default), the value is nil. */)
1900/* This code is disabled now that we use the selected frame to return 1900/* This code is disabled now that we use the selected frame to return
1901 keyboard-local-values. */ 1901 keyboard-local-values. */
1902#if 0 1902#if 0
1903extern struct device *get_device P_ ((Lisp_Object display, int)); 1903extern struct terminal *get_terminal P_ ((Lisp_Object display, int));
1904 1904
1905DEFUN ("terminal-local-value", Fterminal_local_value, Sterminal_local_value, 2, 2, 0, 1905DEFUN ("terminal-local-value", Fterminal_local_value, Sterminal_local_value, 2, 2, 0,
1906 doc: /* Return the terminal-local value of SYMBOL on DEVICE. 1906 doc: /* Return the terminal-local value of SYMBOL on TERMINAL.
1907If SYMBOL is not a terminal-local variable, then return its normal 1907If SYMBOL is not a terminal-local variable, then return its normal
1908value, like `symbol-value'. 1908value, like `symbol-value'.
1909 1909
1910DEVICE may be a display device id, a frame, or nil (meaning the 1910TERMINAL may be a terminal id, a frame, or nil (meaning the
1911selected frame's display device). */) 1911selected frame's terminal device). */)
1912 (symbol, device) 1912 (symbol, terminal)
1913 Lisp_Object symbol; 1913 Lisp_Object symbol;
1914 Lisp_Object device; 1914 Lisp_Object terminal;
1915{ 1915{
1916 Lisp_Object result; 1916 Lisp_Object result;
1917 struct device *d = get_device (device, 1); 1917 struct terminal *t = get_terminal (terminal, 1);
1918 push_kboard (d->kboard); 1918 push_kboard (t->kboard);
1919 result = Fsymbol_value (symbol); 1919 result = Fsymbol_value (symbol);
1920 pop_kboard (); 1920 pop_kboard ();
1921 return result; 1921 return result;
1922} 1922}
1923 1923
1924DEFUN ("set-terminal-local-value", Fset_terminal_local_value, Sset_terminal_local_value, 3, 3, 0, 1924DEFUN ("set-terminal-local-value", Fset_terminal_local_value, Sset_terminal_local_value, 3, 3, 0,
1925 doc: /* Set the terminal-local binding of SYMBOL on DEVICE to VALUE. 1925 doc: /* Set the terminal-local binding of SYMBOL on TERMINAL to VALUE.
1926If VARIABLE is not a terminal-local variable, then set its normal 1926If VARIABLE is not a terminal-local variable, then set its normal
1927binding, like `set'. 1927binding, like `set'.
1928 1928
1929DEVICE may be a display device id, a frame, or nil (meaning the 1929TERMINAL may be a terminal id, a frame, or nil (meaning the
1930selected frame's display device). */) 1930selected frame's terminal device). */)
1931 (symbol, device, value) 1931 (symbol, terminal, value)
1932 Lisp_Object symbol; 1932 Lisp_Object symbol;
1933 Lisp_Object device; 1933 Lisp_Object terminal;
1934 Lisp_Object value; 1934 Lisp_Object value;
1935{ 1935{
1936 Lisp_Object result; 1936 Lisp_Object result;
1937 struct device *d = get_device (device, 1); 1937 struct terminal *t = get_terminal (terminal, 1);
1938 push_kboard (d->kboard); 1938 push_kboard (d->kboard);
1939 result = Fset (symbol, value); 1939 result = Fset (symbol, value);
1940 pop_kboard (); 1940 pop_kboard ();