[PATCH] package sh-script executable.el (executable-interpret): parameter correction

Dear Reviewers, Do you think the following changelog and patch are acceptable to be commited? ChangeLog addition: 2008-03-15 It's me FKtPp ;) <m_pupil(a)yahoo.com.cn&gt; * executable.el (executable-interpret): Correct compile-internal's parameters to avoid error when `C-c C-x'(executable-interpret). sh-script[Packages] source patch: Diff command: cvs -q diff -u Files affected: executable.el =================================================================== RCS Index: executable.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/sh-script/executable.el,v retrieving revision 1.4 diff -u -r1.4 executable.el --- executable.el 2005/10/15 21:27:07 1.4 +++ executable.el 2008/03/15 08:26:22 ＠＠ -223,9 +223,12 ＠＠ (save-some-buffers (not compilation-ask-about-save)) (set (make-local-variable 'executable-command) command) (let ((compilation-error-regexp-alist executable-error-regexp-alist)) - (compile-internal command t (lambda (x) "*interpretation*")))) - - + (compile-internal command + "No More Errors" + nil + nil + nil + (lambda (x) "*interpretation*")))) ;;;###autoload (defun executable-set-magic (interpreter &optional argument _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches