diff options
Diffstat (limited to 'lisp/sort.el')
| -rw-r--r-- | lisp/sort.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/sort.el b/lisp/sort.el index d08e07dc4b..02e45158df 100644 --- a/lisp/sort.el +++ b/lisp/sort.el @@ -491,7 +491,7 @@ Use \\[untabify] to convert tabs to spaces before sorting." (setq col-end (max col-beg1 col-end1)) (if (search-backward "\t" beg1 t) (error "sort-columns does not work with tabs -- use M-x untabify")) - (if (not (or (memq system-type '(vax-vms windows-nt)) + (if (not (or (memq system-type '(windows-nt)) (let ((pos beg1) plist fontified) (catch 'found (while (< pos end1) @@ -516,7 +516,7 @@ Use \\[untabify] to convert tabs to spaces before sorting." (when sort-fold-case (push "-f" sort-args)) (apply #'call-process-region beg1 end1 "sort" t t nil sort-args)) - ;; On VMS and ms-windows, use Emacs's own facilities. + ;; On ms-windows, use Emacs's own facilities. (save-excursion (save-restriction (narrow-to-region beg1 end1) |