aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorPaul Eggert2017-10-12 13:44:56 -0700
committerPaul Eggert2017-10-12 13:44:56 -0700
commitd0f910cbf862db2a89d56e6414c93a93e46e202b (patch)
tree0504513f33cdb0a31e5b04ecd60c374a5d096dda /lisp
parenta346d5bd25acee99bb94f9b785507d4e4ccb554b (diff)
parent59b5dc60d660f81f8b781068d13727ed812ad555 (diff)
downloademacs-d0f910cbf862db2a89d56e6414c93a93e46e202b.tar.gz
emacs-d0f910cbf862db2a89d56e6414c93a93e46e202b.zip
Merge from origin/emacs-26
59b5dc60d6 Fix this-command-keys for "M-x foo" commands 2f4bd2fbda Let rename-file rename dirs across filesystems 413978727c Simplify Flymake user documentation 6ff18c3995 * etc/NEWS: Mention the new version of Org. b78332c3c6 Don't use (format "%s" ...) for string copying (Bug#28774) 078fb7f6df Make frame-list-z-order on NS match Windows behaviour (bug... # Conflicts: # etc/NEWS
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ido.el2
-rw-r--r--lisp/progmodes/flymake.el31
2 files changed, 17 insertions, 16 deletions
diff --git a/lisp/ido.el b/lisp/ido.el
index 47cbcb63c69..4f1e36ba914 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -4701,7 +4701,7 @@ Modified from `icomplete-completions'."
4701 (if (and ido-use-faces comps) 4701 (if (and ido-use-faces comps)
4702 (let* ((fn (ido-name (car comps))) 4702 (let* ((fn (ido-name (car comps)))
4703 (ln (length fn))) 4703 (ln (length fn)))
4704 (setq first (format "%s" fn)) 4704 (setq first (copy-sequence fn))
4705 (put-text-property 0 ln 'face 4705 (put-text-property 0 ln 'face
4706 (if (= (length comps) 1) 4706 (if (= (length comps) 1)
4707 (if ido-incomplete-regexp 4707 (if ido-incomplete-regexp
diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el
index e4c6a38a77e..8c9c4b211a2 100644
--- a/lisp/progmodes/flymake.el
+++ b/lisp/progmodes/flymake.el
@@ -878,11 +878,11 @@ Do it only if `flymake-no-changes-timeout' is non-nil."
878 (flymake-log :warning "Turned on in `flymake-find-file-hook'"))) 878 (flymake-log :warning "Turned on in `flymake-find-file-hook'")))
879 879
880(defun flymake-goto-next-error (&optional n filter interactive) 880(defun flymake-goto-next-error (&optional n filter interactive)
881 "Go to Nth next Flymake error in buffer matching FILTER. 881 "Go to Nth next Flymake diagnostic that matches FILTER.
882Interactively, always move to the next error. With a prefix arg, 882Interactively, always move to the next diagnostic. With a prefix
883skip any diagnostics with a severity less than `:warning'. 883arg, skip any diagnostics with a severity less than `:warning'.
884 884
885If `flymake-wrap-around' is non-nil and no more next errors, 885If `flymake-wrap-around' is non-nil and no more next diagnostics,
886resumes search from top. 886resumes search from top.
887 887
888FILTER is a list of diagnostic types found in 888FILTER is a list of diagnostic types found in
@@ -933,12 +933,13 @@ applied."
933 "")))))) 933 ""))))))
934 934
935(defun flymake-goto-prev-error (&optional n filter interactive) 935(defun flymake-goto-prev-error (&optional n filter interactive)
936 "Go to Nth previous Flymake error in buffer matching FILTER. 936 "Go to Nth previous Flymake diagnostic that matches FILTER.
937Interactively, always move to the previous error. With a prefix 937Interactively, always move to the previous diagnostic. With a
938arg, skip any diagnostics with a severity less than `:warning'. 938prefix arg, skip any diagnostics with a severity less than
939`:warning'.
939 940
940If `flymake-wrap-around' is non-nil and no more previous errors, 941If `flymake-wrap-around' is non-nil and no more previous
941resumes search from bottom. 942diagnostics, resumes search from bottom.
942 943
943FILTER is a list of diagnostic types found in 944FILTER is a list of diagnostic types found in
944`flymake-diagnostic-types-alist', or nil, if no filter is to be 945`flymake-diagnostic-types-alist', or nil, if no filter is to be
@@ -953,13 +954,13 @@ applied."
953;;; 954;;;
954(easy-menu-define flymake-menu flymake-mode-map "Flymake" 955(easy-menu-define flymake-menu flymake-mode-map "Flymake"
955 `("Flymake" 956 `("Flymake"
956 [ "Go to next error" flymake-goto-next-error t ] 957 [ "Go to next problem" flymake-goto-next-error t ]
957 [ "Go to previous error" flymake-goto-prev-error t ] 958 [ "Go to previous problem" flymake-goto-prev-error t ]
958 [ "Check now" flymake-start t ] 959 [ "Check now" flymake-start t ]
959 [ "Go to log buffer" flymake-switch-to-log-buffer t ] 960 [ "List all problems" flymake-show-diagnostics-buffer t ]
960 [ "Show error buffer" flymake-show-diagnostics-buffer t ]
961 "--" 961 "--"
962 [ "Turn off Flymake" flymake-mode t ])) 962 [ "Go to log buffer" flymake-switch-to-log-buffer t ]
963 [ "Turn off Flymake" flymake-mode t ]))
963 964
964(defvar flymake--mode-line-format `(:eval (flymake--mode-line-format))) 965(defvar flymake--mode-line-format `(:eval (flymake--mode-line-format)))
965 966