diff options
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/ebrowse.el | 3 | ||||
| -rw-r--r-- | lisp/progmodes/flymake-proc.el | 4 | ||||
| -rw-r--r-- | lisp/progmodes/js.el | 2 |
3 files changed, 5 insertions, 4 deletions
diff --git a/lisp/progmodes/ebrowse.el b/lisp/progmodes/ebrowse.el index 733e3735821..eb0ec87a222 100644 --- a/lisp/progmodes/ebrowse.el +++ b/lisp/progmodes/ebrowse.el | |||
| @@ -2641,7 +2641,8 @@ means the member buffer is standalone. CLASS is its class." | |||
| 2641 | 2641 | ||
| 2642 | 2642 | ||
| 2643 | (defun ebrowse-member-display-p (member) | 2643 | (defun ebrowse-member-display-p (member) |
| 2644 | "Return t if MEMBER must be displayed under the current filter settings." | 2644 | "Check if MEMBER must be displayed under the current filter settings. |
| 2645 | If so, return MEMBER; otherwise return nil." | ||
| 2645 | (if (and (aref ebrowse--filters (ebrowse-ms-visibility member)) | 2646 | (if (and (aref ebrowse--filters (ebrowse-ms-visibility member)) |
| 2646 | (or (null ebrowse--const-display-flag) | 2647 | (or (null ebrowse--const-display-flag) |
| 2647 | (ebrowse-const-p member)) | 2648 | (ebrowse-const-p member)) |
diff --git a/lisp/progmodes/flymake-proc.el b/lisp/progmodes/flymake-proc.el index f08ba2f3681..571ee170e32 100644 --- a/lisp/progmodes/flymake-proc.el +++ b/lisp/progmodes/flymake-proc.el | |||
| @@ -444,7 +444,7 @@ instead of reading master file from disk." | |||
| 444 | 444 | ||
| 445 | (defun flymake-proc--check-include (source-file-name inc-name include-dirs) | 445 | (defun flymake-proc--check-include (source-file-name inc-name include-dirs) |
| 446 | "Check if SOURCE-FILE-NAME can be found in include path. | 446 | "Check if SOURCE-FILE-NAME can be found in include path. |
| 447 | Return t if it can be found via include path using INC-NAME." | 447 | Return non-nil if it can be found via include path using INC-NAME." |
| 448 | (if (file-name-absolute-p inc-name) | 448 | (if (file-name-absolute-p inc-name) |
| 449 | (flymake-proc--same-files source-file-name inc-name) | 449 | (flymake-proc--same-files source-file-name inc-name) |
| 450 | (while (and include-dirs | 450 | (while (and include-dirs |
| @@ -458,7 +458,7 @@ Return t if it can be found via include path using INC-NAME." | |||
| 458 | 458 | ||
| 459 | (defun flymake-proc--find-buffer-for-file (file-name) | 459 | (defun flymake-proc--find-buffer-for-file (file-name) |
| 460 | "Check if there exists a buffer visiting FILE-NAME. | 460 | "Check if there exists a buffer visiting FILE-NAME. |
| 461 | Return t if so, nil if not." | 461 | Return the buffer if it exists, nil if not." |
| 462 | (let ((buffer-name (get-file-buffer file-name))) | 462 | (let ((buffer-name (get-file-buffer file-name))) |
| 463 | (if buffer-name | 463 | (if buffer-name |
| 464 | (get-buffer buffer-name)))) | 464 | (get-buffer buffer-name)))) |
diff --git a/lisp/progmodes/js.el b/lisp/progmodes/js.el index 8d457a28ec2..599923dd279 100644 --- a/lisp/progmodes/js.el +++ b/lisp/progmodes/js.el | |||
| @@ -2703,7 +2703,7 @@ Whitespace and comments around the arrow are ignored.") | |||
| 2703 | 2703 | ||
| 2704 | (defun js--broken-arrow-terminates-line-p () | 2704 | (defun js--broken-arrow-terminates-line-p () |
| 2705 | "Helper function for `js--proper-indentation'. | 2705 | "Helper function for `js--proper-indentation'. |
| 2706 | Return t if the last non-comment, non-whitespace token of the | 2706 | Return non-nil if the last non-comment, non-whitespace token of the |
| 2707 | current line is the \"=>\" token (of an arrow function)." | 2707 | current line is the \"=>\" token (of an arrow function)." |
| 2708 | (let ((from (point))) | 2708 | (let ((from (point))) |
| 2709 | (end-of-line) | 2709 | (end-of-line) |