aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
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