Commit e2045997 authored by Chong Yidong's avatar Chong Yidong
Browse files

* emacs-lisp/advice.el (ad-get-argument, ad-set-argument): Doc

fix (Bug#3932).
parent 83f83a98
2009-09-19 Chong Yidong <cyd@stupidchicken.com> 2009-09-19 Chong Yidong <cyd@stupidchicken.com>
* emacs-lisp/advice.el (ad-get-argument, ad-set-argument): Doc
fix (Bug#3932).
* subr.el (baud-rate): Remove long-obsolete function (Bug#4372). * subr.el (baud-rate): Remove long-obsolete function (Bug#4372).
* time-stamp.el (time-stamp-month-dd-yyyy) * time-stamp.el (time-stamp-month-dd-yyyy)
......
...@@ -2781,7 +2781,8 @@ to be accessed, it returns a list with the index and name." ...@@ -2781,7 +2781,8 @@ to be accessed, it returns a list with the index and name."
(list (- index (length reqopt-args)) rest-arg))))) (list (- index (length reqopt-args)) rest-arg)))))
(defun ad-get-argument (arglist index) (defun ad-get-argument (arglist index)
"Return form to access ARGLIST's actual argument at position INDEX." "Return form to access ARGLIST's actual argument at position INDEX.
INDEX counts from zero."
(let ((argument-access (ad-access-argument arglist index))) (let ((argument-access (ad-access-argument arglist index)))
(cond ((consp argument-access) (cond ((consp argument-access)
(ad-element-access (ad-element-access
...@@ -2789,7 +2790,8 @@ to be accessed, it returns a list with the index and name." ...@@ -2789,7 +2790,8 @@ to be accessed, it returns a list with the index and name."
(argument-access)))) (argument-access))))
(defun ad-set-argument (arglist index value-form) (defun ad-set-argument (arglist index value-form)
"Return form to set ARGLIST's actual arg at INDEX to VALUE-FORM." "Return form to set ARGLIST's actual arg at INDEX to VALUE-FORM.
INDEX counts from zero."
(let ((argument-access (ad-access-argument arglist index))) (let ((argument-access (ad-access-argument arglist index)))
(cond ((consp argument-access) (cond ((consp argument-access)
;; should this check whether there actually is something to set? ;; should this check whether there actually is something to set?
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment