Permalink
Browse files

Add 'autoload' pragma(adviesed by rolandwalker)

  • Loading branch information...
1 parent 5cd0e97 commit 910d33b709c050c26a41cc46b4849f9b77a739f5 @syohex committed Aug 31, 2012
Showing with 4 additions and 1 deletion.
  1. +4 −1 quickrun.el
View
@@ -764,7 +764,6 @@ by quickrun.el. But you can register your own command for some languages")
(defun quickrun-set-default (lang key)
"Set `key' as default key in programing language `lang'"
- (interactive)
(unless (assoc key quickrun/language-alist)
(error "%s is not registered." key))
(puthash lang key quickrun/command-key-table))
@@ -845,6 +844,7 @@ by quickrun.el. But you can register your own command for some languages")
(message "%s" has-error)
(quickrun/remove-temp-files)))))
+;;;###autoload
(defun quickrun-with-arg (arg)
"Run commands quickly for current buffer with arguments"
(interactive
@@ -864,19 +864,22 @@ by quickrun.el. But you can register your own command for some languages")
quickrun/language-alist
nil nil nil nil default-value)))
+;;;###autoload
(defun quickrun-region (start end)
"Run commands with specified region"
(interactive "r")
(quickrun :start start :end end))
(defvar quickrun/compile-only-flag nil)
+;;;###autoload
(defun quickrun-compile-only ()
"Exec only compilation"
(interactive)
(let ((quickrun/compile-only-flag t))
(quickrun)))
+;;;###autoload
(defun quickrun-shell ()
"Run commands in shell for interactive programs"
(interactive)

0 comments on commit 910d33b

Please sign in to comment.