diff options
| author | Tassilo Horn | 2015-06-05 23:58:39 +0200 |
|---|---|---|
| committer | Tassilo Horn | 2015-06-05 23:58:39 +0200 |
| commit | 9533ed8d05c347b513f8680ecde8d4120114b2b9 (patch) | |
| tree | d7347dec97adbf803beb494aa03437667472f367 | |
| parent | b0eb66823f12c85d04e36ddd0e58e20c0a0694db (diff) | |
| download | emacs-9533ed8d05c347b513f8680ecde8d4120114b2b9.tar.gz emacs-9533ed8d05c347b513f8680ecde8d4120114b2b9.zip | |
Use string> instead of equiv lambda with string<
* lisp/help.el (view-emacs-news): Use string> instead of equivalent
lambda with string<.
| -rw-r--r-- | lisp/help.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/help.el b/lisp/help.el index 1411c1aab9a..fd5cbc66ab2 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -360,7 +360,7 @@ With argument, display info only for the selected version." | |||
| 360 | (cons "NEWS" | 360 | (cons "NEWS" |
| 361 | (directory-files data-directory nil | 361 | (directory-files data-directory nil |
| 362 | "^NEWS\\.[0-9][-0-9]*$" nil))) | 362 | "^NEWS\\.[0-9][-0-9]*$" nil))) |
| 363 | (sort (delete-dups res) (lambda (a b) (string< b a))))) | 363 | (sort (delete-dups res) #'string>))) |
| 364 | (current (car all-versions))) | 364 | (current (car all-versions))) |
| 365 | (setq version (completing-read | 365 | (setq version (completing-read |
| 366 | (format "Read NEWS for the version (default %s): " current) | 366 | (format "Read NEWS for the version (default %s): " current) |