Mercurial > emacs
changeset 2185:5bf3a379d7b5
* sort.el (sort-float-fields, sort-numeric-fields): Use
string-to-number, not string-to-float or string-to-int.
* sort.el (sort-float-fields): Make this autoloaded.
* sort.el (sort-numeric-fields): Doc fix.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Mon, 15 Mar 1993 04:46:45 +0000 |
| parents | 2b5d701915fe |
| children | 82e8ee492593 |
| files | lisp/sort.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/sort.el Mon Mar 15 04:43:47 1993 +0000 +++ b/lisp/sort.el Mon Mar 15 04:46:45 1993 +0000 @@ -239,12 +239,13 @@ Specified field must contain a number in each line of the region. With a negative arg, sorts by the ARGth field counted from the right. Called from a program, there are three arguments: -FIELD, BEG and END. BEG and END specify region to sort." +FIELD, BEG and END. BEG and END specify region to sort. +If you want to sort floating-point numbers, try `sort-float-fields'." (interactive "p\nr") (sort-fields-1 field beg end (function (lambda () (sort-skip-fields (1- field)) - (string-to-int + (string-to-number (buffer-substring (point) (save-excursion @@ -254,6 +255,7 @@ (point)))))) nil)) +;;;###autoload (defun sort-float-fields (field beg end) "Sort lines in region numerically by the ARGth field of each line. Fields are separated by whitespace and numbered from 1 up. Specified field