diff options
| author | Dima Kogan | 2016-11-23 18:04:21 -0800 |
|---|---|---|
| committer | Dima Kogan | 2016-11-23 18:05:35 -0800 |
| commit | dfc5b0f65531ef71cbd2c0cc956c246ea4239612 (patch) | |
| tree | ac3a3f38b082b13bd0f39daa377fbd5b5f25b1d5 | |
| parent | 561ce852ad0a90aac07fd16cd591ca8a408043c3 (diff) | |
| download | emacs-dfc5b0f65531ef71cbd2c0cc956c246ea4239612.tar.gz emacs-dfc5b0f65531ef71cbd2c0cc956c246ea4239612.zip | |
Clarify ediff-directories prompt
* lisp/vc/ediff-mult.el (ediff-filegroup-action):
* lisp/vc/ediff.el (ediff-directories,ediff-directory-revisions,
ediff-directories3, ediff-merge-directories,
ediff-merge-directories-with-ancestor, ediff-merge-directory-revisions,
ediff-merge-directory-revisions-with-ancestor): Clarify prompt message for
filename filter in interactive ediff. The new message makes it clear what is
being filtered
| -rw-r--r-- | lisp/vc/ediff-mult.el | 6 | ||||
| -rw-r--r-- | lisp/vc/ediff.el | 28 |
2 files changed, 17 insertions, 17 deletions
diff --git a/lisp/vc/ediff-mult.el b/lisp/vc/ediff-mult.el index 7f0db5d45dc..9c7e278e6ab 100644 --- a/lisp/vc/ediff-mult.el +++ b/lisp/vc/ediff-mult.el | |||
| @@ -1846,9 +1846,9 @@ all marked sessions must be active." | |||
| 1846 | (read-string | 1846 | (read-string |
| 1847 | (if (stringp default-regexp) | 1847 | (if (stringp default-regexp) |
| 1848 | (format | 1848 | (format |
| 1849 | "Filter through regular expression (default %s): " | 1849 | "Filter filenames through regular expression (default %s): " |
| 1850 | default-regexp) | 1850 | default-regexp) |
| 1851 | "Filter through regular expression: ") | 1851 | "Filter filenames through regular expression: ") |
| 1852 | nil | 1852 | nil |
| 1853 | 'ediff-filtering-regexp-history | 1853 | 'ediff-filtering-regexp-history |
| 1854 | (eval ediff-default-filtering-regexp))) | 1854 | (eval ediff-default-filtering-regexp))) |
| @@ -1872,7 +1872,7 @@ all marked sessions must be active." | |||
| 1872 | (file-directory-p file1)) | 1872 | (file-directory-p file1)) |
| 1873 | (if (ediff-buffer-live-p session-buf) | 1873 | (if (ediff-buffer-live-p session-buf) |
| 1874 | (ediff-show-meta-buffer session-buf) | 1874 | (ediff-show-meta-buffer session-buf) |
| 1875 | (setq regexp (read-string "Filter through regular expression: " | 1875 | (setq regexp (read-string "Filter filenames through regular expression: " |
| 1876 | nil 'ediff-filtering-regexp-history)) | 1876 | nil 'ediff-filtering-regexp-history)) |
| 1877 | (ediff-directory-revisions-internal | 1877 | (ediff-directory-revisions-internal |
| 1878 | file1 regexp | 1878 | file1 regexp |
diff --git a/lisp/vc/ediff.el b/lisp/vc/ediff.el index a4244c941d2..ed36a3fc8c1 100644 --- a/lisp/vc/ediff.el +++ b/lisp/vc/ediff.el | |||
| @@ -553,9 +553,9 @@ expression; only file names that match the regexp are considered." | |||
| 553 | nil 'must-match) | 553 | nil 'must-match) |
| 554 | (read-string | 554 | (read-string |
| 555 | (if (stringp default-regexp) | 555 | (if (stringp default-regexp) |
| 556 | (format "Filter through regular expression (default %s): " | 556 | (format "Filter filenames through regular expression (default %s): " |
| 557 | default-regexp) | 557 | default-regexp) |
| 558 | "Filter through regular expression: ") | 558 | "Filter filenames through regular expression: ") |
| 559 | nil | 559 | nil |
| 560 | 'ediff-filtering-regexp-history | 560 | 'ediff-filtering-regexp-history |
| 561 | (eval ediff-default-filtering-regexp)) | 561 | (eval ediff-default-filtering-regexp)) |
| @@ -581,9 +581,9 @@ names. Only the files that are under revision control are taken into account." | |||
| 581 | "Directory to compare with revision:" dir-A nil 'must-match) | 581 | "Directory to compare with revision:" dir-A nil 'must-match) |
| 582 | (read-string | 582 | (read-string |
| 583 | (if (stringp default-regexp) | 583 | (if (stringp default-regexp) |
| 584 | (format "Filter through regular expression (default %s): " | 584 | (format "Filter filenames through regular expression (default %s): " |
| 585 | default-regexp) | 585 | default-regexp) |
| 586 | "Filter through regular expression: ") | 586 | "Filter filenames through regular expression: ") |
| 587 | nil | 587 | nil |
| 588 | 'ediff-filtering-regexp-history | 588 | 'ediff-filtering-regexp-history |
| 589 | (eval ediff-default-filtering-regexp)) | 589 | (eval ediff-default-filtering-regexp)) |
| @@ -619,9 +619,9 @@ regular expression; only file names that match the regexp are considered." | |||
| 619 | nil 'must-match) | 619 | nil 'must-match) |
| 620 | (read-string | 620 | (read-string |
| 621 | (if (stringp default-regexp) | 621 | (if (stringp default-regexp) |
| 622 | (format "Filter through regular expression (default %s): " | 622 | (format "Filter filenames through regular expression (default %s): " |
| 623 | default-regexp) | 623 | default-regexp) |
| 624 | "Filter through regular expression: ") | 624 | "Filter filenames through regular expression: ") |
| 625 | nil | 625 | nil |
| 626 | 'ediff-filtering-regexp-history | 626 | 'ediff-filtering-regexp-history |
| 627 | (eval ediff-default-filtering-regexp)) | 627 | (eval ediff-default-filtering-regexp)) |
| @@ -651,9 +651,9 @@ expression; only file names that match the regexp are considered." | |||
| 651 | nil 'must-match) | 651 | nil 'must-match) |
| 652 | (read-string | 652 | (read-string |
| 653 | (if (stringp default-regexp) | 653 | (if (stringp default-regexp) |
| 654 | (format "Filter through regular expression (default %s): " | 654 | (format "Filter filenames through regular expression (default %s): " |
| 655 | default-regexp) | 655 | default-regexp) |
| 656 | "Filter through regular expression: ") | 656 | "Filter filenames through regular expression: ") |
| 657 | nil | 657 | nil |
| 658 | 'ediff-filtering-regexp-history | 658 | 'ediff-filtering-regexp-history |
| 659 | (eval ediff-default-filtering-regexp)) | 659 | (eval ediff-default-filtering-regexp)) |
| @@ -692,9 +692,9 @@ only file names that match the regexp are considered." | |||
| 692 | nil 'must-match) | 692 | nil 'must-match) |
| 693 | (read-string | 693 | (read-string |
| 694 | (if (stringp default-regexp) | 694 | (if (stringp default-regexp) |
| 695 | (format "Filter through regular expression (default %s): " | 695 | (format "Filter filenames through regular expression (default %s): " |
| 696 | default-regexp) | 696 | default-regexp) |
| 697 | "Filter through regular expression: ") | 697 | "Filter filenames through regular expression: ") |
| 698 | nil | 698 | nil |
| 699 | 'ediff-filtering-regexp-history | 699 | 'ediff-filtering-regexp-history |
| 700 | (eval ediff-default-filtering-regexp)) | 700 | (eval ediff-default-filtering-regexp)) |
| @@ -719,9 +719,9 @@ names. Only the files that are under revision control are taken into account." | |||
| 719 | "Directory to merge with revisions:" dir-A nil 'must-match) | 719 | "Directory to merge with revisions:" dir-A nil 'must-match) |
| 720 | (read-string | 720 | (read-string |
| 721 | (if (stringp default-regexp) | 721 | (if (stringp default-regexp) |
| 722 | (format "Filter through regular expression (default %s): " | 722 | (format "Filter filenames through regular expression (default %s): " |
| 723 | default-regexp) | 723 | default-regexp) |
| 724 | "Filter through regular expression: ") | 724 | "Filter filenames through regular expression: ") |
| 725 | nil | 725 | nil |
| 726 | 'ediff-filtering-regexp-history | 726 | 'ediff-filtering-regexp-history |
| 727 | (eval ediff-default-filtering-regexp)) | 727 | (eval ediff-default-filtering-regexp)) |
| @@ -750,9 +750,9 @@ names. Only the files that are under revision control are taken into account." | |||
| 750 | dir-A nil 'must-match) | 750 | dir-A nil 'must-match) |
| 751 | (read-string | 751 | (read-string |
| 752 | (if (stringp default-regexp) | 752 | (if (stringp default-regexp) |
| 753 | (format "Filter through regular expression (default %s): " | 753 | (format "Filter filenames through regular expression (default %s): " |
| 754 | default-regexp) | 754 | default-regexp) |
| 755 | "Filter through regular expression: ") | 755 | "Filter filenames through regular expression: ") |
| 756 | nil | 756 | nil |
| 757 | 'ediff-filtering-regexp-history | 757 | 'ediff-filtering-regexp-history |
| 758 | (eval ediff-default-filtering-regexp)) | 758 | (eval ediff-default-filtering-regexp)) |