Mercurial > hg > xemacs-beta

diff lisp/modes/executable.el @ 22:8fc7fe29b841 r19-15b94

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b94
author cvs
date Mon, 13 Aug 2007 08:50:29 +0200
parents ac2d302a0011
children 131b0175ea99
line wrap: on
line diff
--- a/lisp/modes/executable.el	Mon Aug 13 08:50:06 2007 +0200
+++ b/lisp/modes/executable.el	Mon Aug 13 08:50:29 2007 +0200
@@ -211,7 +211,8 @@
 			     (y-or-n-p (concat "Replace magic number by `"
 					       executable-prefix argument "'? "))))
 		       (progn
-			 (replace-match argument t t nil 1)
+			 (replace-match (concat executable-prefix argument)
+					t t nil 1)
 			 (message "Magic number changed to `%s'"
 				  (concat executable-prefix argument)))))
 	    (insert executable-prefix argument ?\n)