aboutsummaryrefslogtreecommitdiffstats
path: root/src/buffer.c
diff options
context:
space:
mode:
authorJuanma Barranquero2005-05-27 11:02:11 +0000
committerJuanma Barranquero2005-05-27 11:02:11 +0000
commit5e2ad10b99541b8c1d66bb9b6ceca4b69dfa6131 (patch)
treeb9f5cbf59ecd95d94dfc92058269231464bc00bd /src/buffer.c
parent48985adc8a3eb33f582f3348cb9192a7e0979240 (diff)
downloademacs-5e2ad10b99541b8c1d66bb9b6ceca4b69dfa6131.tar.gz
emacs-5e2ad10b99541b8c1d66bb9b6ceca4b69dfa6131.zip
(Fbuffer_local_value): Make argument name match its use in docstring.
Diffstat (limited to 'src/buffer.c')
-rw-r--r--src/buffer.c36
1 files changed, 18 insertions, 18 deletions
diff --git a/src/buffer.c b/src/buffer.c
index e9567841c8e..dfcf4a9a0b9 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -877,20 +877,20 @@ DEFUN ("buffer-local-value", Fbuffer_local_value,
877 Sbuffer_local_value, 2, 2, 0, 877 Sbuffer_local_value, 2, 2, 0,
878 doc: /* Return the value of VARIABLE in BUFFER. 878 doc: /* Return the value of VARIABLE in BUFFER.
879If VARIABLE does not have a buffer-local binding in BUFFER, the value 879If VARIABLE does not have a buffer-local binding in BUFFER, the value
880is the default binding of variable. */) 880is the default binding of the variable. */)
881 (symbol, buffer) 881 (variable, buffer)
882 register Lisp_Object symbol; 882 register Lisp_Object variable;
883 register Lisp_Object buffer; 883 register Lisp_Object buffer;
884{ 884{
885 register struct buffer *buf; 885 register struct buffer *buf;
886 register Lisp_Object result; 886 register Lisp_Object result;
887 887
888 CHECK_SYMBOL (symbol); 888 CHECK_SYMBOL (variable);
889 CHECK_BUFFER (buffer); 889 CHECK_BUFFER (buffer);
890 buf = XBUFFER (buffer); 890 buf = XBUFFER (buffer);
891 891
892 /* Look in local_var_list */ 892 /* Look in local_var_list */
893 result = Fassoc (symbol, buf->local_var_alist); 893 result = Fassoc (variable, buf->local_var_alist);
894 if (NILP (result)) 894 if (NILP (result))
895 { 895 {
896 int offset, idx; 896 int offset, idx;
@@ -905,7 +905,7 @@ is the default binding of variable. */)
905 idx = PER_BUFFER_IDX (offset); 905 idx = PER_BUFFER_IDX (offset);
906 if ((idx == -1 || PER_BUFFER_VALUE_P (buf, idx)) 906 if ((idx == -1 || PER_BUFFER_VALUE_P (buf, idx))
907 && SYMBOLP (PER_BUFFER_SYMBOL (offset)) 907 && SYMBOLP (PER_BUFFER_SYMBOL (offset))
908 && EQ (PER_BUFFER_SYMBOL (offset), symbol)) 908 && EQ (PER_BUFFER_SYMBOL (offset), variable))
909 { 909 {
910 result = PER_BUFFER_VALUE (buf, offset); 910 result = PER_BUFFER_VALUE (buf, offset);
911 found = 1; 911 found = 1;
@@ -914,7 +914,7 @@ is the default binding of variable. */)
914 } 914 }
915 915
916 if (!found) 916 if (!found)
917 result = Fdefault_value (symbol); 917 result = Fdefault_value (variable);
918 } 918 }
919 else 919 else
920 { 920 {
@@ -922,7 +922,7 @@ is the default binding of variable. */)
922 Lisp_Object current_alist_element; 922 Lisp_Object current_alist_element;
923 923
924 /* What binding is loaded right now? */ 924 /* What binding is loaded right now? */
925 valcontents = SYMBOL_VALUE (symbol); 925 valcontents = SYMBOL_VALUE (variable);
926 current_alist_element 926 current_alist_element
927 = XCAR (XBUFFER_LOCAL_VALUE (valcontents)->cdr); 927 = XCAR (XBUFFER_LOCAL_VALUE (valcontents)->cdr);
928 928
@@ -939,7 +939,7 @@ is the default binding of variable. */)
939 } 939 }
940 940
941 if (EQ (result, Qunbound)) 941 if (EQ (result, Qunbound))
942 return Fsignal (Qvoid_variable, Fcons (symbol, Qnil)); 942 return Fsignal (Qvoid_variable, Fcons (variable, Qnil));
943 943
944 return result; 944 return result;
945} 945}
@@ -5276,19 +5276,19 @@ This is the same as (default-value 'abbrev-mode). */);
5276 doc: /* Default value of `ctl-arrow' for buffers that do not override it. 5276 doc: /* Default value of `ctl-arrow' for buffers that do not override it.
5277This is the same as (default-value 'ctl-arrow). */); 5277This is the same as (default-value 'ctl-arrow). */);
5278 5278
5279 DEFVAR_LISP_NOPRO ("default-direction-reversed", 5279 DEFVAR_LISP_NOPRO ("default-direction-reversed",
5280 &buffer_defaults.direction_reversed, 5280 &buffer_defaults.direction_reversed,
5281 doc: /* Default value of `direction-reversed' for buffers that do not override it. 5281 doc: /* Default value of `direction-reversed' for buffers that do not override it.
5282This is the same as (default-value 'direction-reversed). */); 5282This is the same as (default-value 'direction-reversed). */);
5283 5283
5284 DEFVAR_LISP_NOPRO ("default-enable-multibyte-characters", 5284 DEFVAR_LISP_NOPRO ("default-enable-multibyte-characters",
5285 &buffer_defaults.enable_multibyte_characters, 5285 &buffer_defaults.enable_multibyte_characters,
5286 doc: /* *Default value of `enable-multibyte-characters' for buffers not overriding it. 5286 doc: /* *Default value of `enable-multibyte-characters' for buffers not overriding it.
5287This is the same as (default-value 'enable-multibyte-characters). */); 5287This is the same as (default-value 'enable-multibyte-characters). */);
5288 5288
5289 DEFVAR_LISP_NOPRO ("default-buffer-file-coding-system", 5289 DEFVAR_LISP_NOPRO ("default-buffer-file-coding-system",
5290 &buffer_defaults.buffer_file_coding_system, 5290 &buffer_defaults.buffer_file_coding_system,
5291 doc: /* Default value of `buffer-file-coding-system' for buffers not overriding it. 5291 doc: /* Default value of `buffer-file-coding-system' for buffers not overriding it.
5292This is the same as (default-value 'buffer-file-coding-system). */); 5292This is the same as (default-value 'buffer-file-coding-system). */);
5293 5293
5294 DEFVAR_LISP_NOPRO ("default-truncate-lines", 5294 DEFVAR_LISP_NOPRO ("default-truncate-lines",