X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/69ab3201ca6f6ef1414d678fd9cb13dd4d6f6b95..7c2fb837ec2f0e0a509f22ccc35f9b43476a6119:/lisp/sort.el

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)