X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/9a707ae30d6a0d8e9acccef69641499e5805b2c7..be21efd0c0776326e0d2bdb770d17b8cbffae18c:/el/dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 93cec99..efbc6ee 100644
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -321,13 +321,13 @@ Interactively, prompt for the command if the variable
 the prefix argument.  Prompt for the directory, and run
 interactively, if requested through the prefix.
 
-Use a prefix of 4, 5, 6, or 7, or type C-u between one and three times, to
+Use a prefix of 4, 6, 12, or 14, or type C-u between one and three times, to
 force prompting for a directory.
 
-Use a prefix of 2, 3, 6, or 7, or type C-u three times, to force
+Use a prefix of 2, 6, 10, or 14, or type C-u three times, to force
 prompting for the command.
 
-Use a prefix of 1, 3, 5, or 7, or type C-u twoce or three times,
+Use a prefix of 8, 10, 12, or 14, or type C-u twice or three times,
 to force interactive compilation."
   (interactive
    (let* ((prefix (prefix-numeric-value current-prefix-arg))
@@ -339,7 +339,7 @@ to force interactive compilation."
 	       (compilation-read-command command)
 	     command)
 	   dir
-	   (plusp (logand prefix #x51)))))
+	   (plusp (logand prefix #x58)))))
   (let ((default-directory (or directory default-directory)))
     (compile command comint)))