diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 9 | ||||
| -rw-r--r-- | lisp/calc/calc-ext.el | 2 | ||||
| -rw-r--r-- | lisp/progmodes/cc-engine.el | 16 |
3 files changed, 20 insertions, 7 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 70d34fb7117..3f603a6ad64 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,12 @@ | |||
| 1 | 2011-08-16 Feng Li <fengli@gmail.com> (tiny change) | ||
| 2 | |||
| 3 | * calc/calc-ext.el (math-defintegral-2): Remove nested backquote. | ||
| 4 | |||
| 5 | 2011-08-16 Alan Mackenzie <acm@muc.de> | ||
| 6 | |||
| 7 | * progmodes/cc-engine.el (c-state-cache-non-literal-place): | ||
| 8 | Correct, to avoid the inside of macros. | ||
| 9 | |||
| 1 | 2011-08-16 Richard Stallman <rms@gnu.org> | 10 | 2011-08-16 Richard Stallman <rms@gnu.org> |
| 2 | 11 | ||
| 3 | * epa-mail.el: Handle GnuPG group definitions. | 12 | * epa-mail.el: Handle GnuPG group definitions. |
diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el index 6e05cdb07e5..8b816665d97 100644 --- a/lisp/calc/calc-ext.el +++ b/lisp/calc/calc-ext.el | |||
| @@ -2887,7 +2887,7 @@ If X is not an error form, return 1." | |||
| 2887 | (cons 'progn | 2887 | (cons 'progn |
| 2888 | (mapcar #'(lambda (func) | 2888 | (mapcar #'(lambda (func) |
| 2889 | `(put ',func 'math-integral-2 | 2889 | `(put ',func 'math-integral-2 |
| 2890 | `(nconc | 2890 | (nconc |
| 2891 | (get ',func 'math-integral-2) | 2891 | (get ',func 'math-integral-2) |
| 2892 | (list #'(lambda (u v) ,@code))))) | 2892 | (list #'(lambda (u v) ,@code))))) |
| 2893 | (if (symbolp funcs) (list funcs) funcs)))) | 2893 | (if (symbolp funcs) (list funcs) funcs)))) |
diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el index 0236a2be296..0d88f85d263 100644 --- a/lisp/progmodes/cc-engine.el +++ b/lisp/progmodes/cc-engine.el | |||
| @@ -2130,13 +2130,17 @@ comment at the start of cc-engine.el for more info." | |||
| 2130 | pos)) | 2130 | pos)) |
| 2131 | 2131 | ||
| 2132 | (defsubst c-state-cache-non-literal-place (pos state) | 2132 | (defsubst c-state-cache-non-literal-place (pos state) |
| 2133 | ;; Return a position outside of a string/comment at or before POS. | 2133 | ;; Return a position outside of a string/comment/macro at or before POS. |
| 2134 | ;; STATE is the parse-partial-sexp state at POS. | 2134 | ;; STATE is the parse-partial-sexp state at POS. |
| 2135 | (if (or (nth 3 state) ; in a string? | 2135 | (let ((res (if (or (nth 3 state) ; in a string? |
| 2136 | (nth 4 state)) ; in a comment? | 2136 | (nth 4 state)) ; in a comment? |
| 2137 | (nth 8 state) | 2137 | (nth 8 state) |
| 2138 | pos)) | 2138 | pos))) |
| 2139 | 2139 | (save-excursion | |
| 2140 | (goto-char res) | ||
| 2141 | (if (c-beginning-of-macro) | ||
| 2142 | (point) | ||
| 2143 | res)))) | ||
| 2140 | 2144 | ||
| 2141 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 2145 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2142 | ;; Stuff to do with point-min, and coping with any literal there. | 2146 | ;; Stuff to do with point-min, and coping with any literal there. |