diff options
| author | Michael Kifer | 2007-06-12 21:18:46 +0000 |
|---|---|---|
| committer | Michael Kifer | 2007-06-12 21:18:46 +0000 |
| commit | 77c572708d87f2fc87612018d30eecccaa3031a6 (patch) | |
| tree | 3ad85da71e7fcc6b67f3715088702c29e7a631a3 /lisp | |
| parent | b8104a2bf5bee4a07cd6f3105a980f9f3324af8f (diff) | |
| download | emacs-77c572708d87f2fc87612018d30eecccaa3031a6.tar.gz emacs-77c572708d87f2fc87612018d30eecccaa3031a6.zip | |
2007-06-12 Michael Kifer <kifer@cs.stonybrook.edu>
* ediff-ptch.el (ediff-context-diff-label-regexp): spurious
parenthesis.
* ediff-init.el: doc strings.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/ediff-init.el | 4 | ||||
| -rw-r--r-- | lisp/ediff-ptch.el | 2 |
3 files changed, 11 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 728dd0f8135..ac8e69d4c08 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,10 @@ | |||
| 1 | 2007-06-12 Michael Kifer <kifer@cs.stonybrook.edu> | ||
| 2 | |||
| 3 | * ediff-ptch.el (ediff-context-diff-label-regexp): spurious | ||
| 4 | parenthesis. | ||
| 5 | |||
| 6 | * ediff-init.el: doc strings. | ||
| 7 | |||
| 1 | 2007-06-12 Stefan Monnier <monnier@iro.umontreal.ca> | 8 | 2007-06-12 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 9 | ||
| 3 | * emacs-lisp/bytecomp.el (byte-compile-current-group): New var. | 10 | * emacs-lisp/bytecomp.el (byte-compile-current-group): New var. |
diff --git a/lisp/ediff-init.el b/lisp/ediff-init.el index d37096f9e89..8d05f2def09 100644 --- a/lisp/ediff-init.el +++ b/lisp/ediff-init.el | |||
| @@ -102,7 +102,7 @@ that Ediff doesn't know about.") | |||
| 102 | (boundp 'ediff-use-toolbar-p) | 102 | (boundp 'ediff-use-toolbar-p) |
| 103 | ediff-use-toolbar-p)) ;Does the user want it ? | 103 | ediff-use-toolbar-p)) ;Does the user want it ? |
| 104 | 104 | ||
| 105 | ;; Defines SYMBOL as an advertised local variable. | 105 | ;; Defines VAR as an advertised local variable. |
| 106 | ;; Performs a defvar, then executes `make-variable-buffer-local' on | 106 | ;; Performs a defvar, then executes `make-variable-buffer-local' on |
| 107 | ;; the variable. Also sets the `permanent-local' property, | 107 | ;; the variable. Also sets the `permanent-local' property, |
| 108 | ;; so that `kill-all-local-variables' (called by major-mode setting | 108 | ;; so that `kill-all-local-variables' (called by major-mode setting |
| @@ -110,6 +110,7 @@ that Ediff doesn't know about.") | |||
| 110 | ;; | 110 | ;; |
| 111 | ;; Plagiarised from `emerge-defvar-local' for XEmacs. | 111 | ;; Plagiarised from `emerge-defvar-local' for XEmacs. |
| 112 | (defmacro ediff-defvar-local (var value doc) | 112 | (defmacro ediff-defvar-local (var value doc) |
| 113 | "Defines VAR as a local variable." | ||
| 113 | (declare (indent defun)) | 114 | (declare (indent defun)) |
| 114 | `(progn | 115 | `(progn |
| 115 | (defvar ,var ,value ,doc) | 116 | (defvar ,var ,value ,doc) |
| @@ -259,6 +260,7 @@ It needs to be killed when we quit the session.") | |||
| 259 | ;; Doesn't save the point and mark. | 260 | ;; Doesn't save the point and mark. |
| 260 | ;; This is `with-current-buffer' with the added test for live buffers." | 261 | ;; This is `with-current-buffer' with the added test for live buffers." |
| 261 | (defmacro ediff-with-current-buffer (buffer &rest body) | 262 | (defmacro ediff-with-current-buffer (buffer &rest body) |
| 263 | "Evaluates BODY in BUFFER." | ||
| 262 | (declare (indent 1) (debug (form body))) | 264 | (declare (indent 1) (debug (form body))) |
| 263 | `(if (ediff-buffer-live-p ,buffer) | 265 | `(if (ediff-buffer-live-p ,buffer) |
| 264 | (save-current-buffer | 266 | (save-current-buffer |
diff --git a/lisp/ediff-ptch.el b/lisp/ediff-ptch.el index 5b345a8d4d6..45fb1e2a3f6 100644 --- a/lisp/ediff-ptch.el +++ b/lisp/ediff-ptch.el | |||
| @@ -139,7 +139,7 @@ patch. So, don't change these variables, unless the default doesn't work." | |||
| 139 | "^\\*\\*\\* \\([^\t]+\\)[^*]+[\t ]*\n--- \\([^\t]+\\)" | 139 | "^\\*\\*\\* \\([^\t]+\\)[^*]+[\t ]*\n--- \\([^\t]+\\)" |
| 140 | "\\|" ; GNU unified format diff 2-liner | 140 | "\\|" ; GNU unified format diff 2-liner |
| 141 | "^--- \\([^\t]+\\)[\t ]+.*\n\\+\\+\\+ \\([^\t]+\\)" | 141 | "^--- \\([^\t]+\\)[\t ]+.*\n\\+\\+\\+ \\([^\t]+\\)" |
| 142 | "\\)")) | 142 | "\\)") |
| 143 | "*Regexp matching filename 2-liners at the start of each context diff. | 143 | "*Regexp matching filename 2-liners at the start of each context diff. |
| 144 | You probably don't want to change that, unless you are using an obscure patch | 144 | You probably don't want to change that, unless you are using an obscure patch |
| 145 | program." | 145 | program." |