diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..6302bc3 --- /dev/null +++ b/.gitignore @@ -0,0 +1,2 @@ +*~ +*.elc diff --git a/doc/newfeat.texi b/doc/newfeat.texi new file mode 100644 index 0000000..ffdaf51 --- /dev/null +++ b/doc/newfeat.texi @@ -0,0 +1,14 @@ +Changes and New Features: +@itemize @bullet + +@item Adjust @code{inferior-ess-prompt} to account for prompt change in for-loops + +@item Call @code{goto-char} in the inferior buffer when starting Stata +(go to end of Stata buffer at start of inferior Stata process; +@code{goto-char} call was previously misplaced + +@item Correct @code{modify-syntax-entry} entry to restore //-style +comments: comments beginning ``//'' now recognized again +@end itemize + + diff --git a/ess-stata-mode.el b/ess-stata-mode.el index 2c3f84f..5b7cdca 100644 --- a/ess-stata-mode.el +++ b/ess-stata-mode.el @@ -35,6 +35,13 @@ (require 'ess-mode) (require 'ess-stata-lang) +(defvar inferior-STA-program + "stata" + "Program name for invoking an inferior ESS with \\[Stata].") + +(defvar inferior-STA-start-args "" + "String of arguments used when starting Stata.") + (defvar STA-dialect-name "stata" "Name of 'dialect' for Stata.");easily changeable in a user's .emacs @@ -99,6 +106,7 @@ "Major mode for editing Stata source." :group 'ess-Stata (ess-setq-vars-local STA-customize-alist) + (setq-local ess-eval-visibly nil) (setq-local comint-use-prompt-regexp t) (setq-local comment-column 40) (setq-local comment-end " */") @@ -110,7 +118,8 @@ (setq-local paragraph-ignore-fill-prefix t) (setq-local paragraph-separate (concat "[ \t\f]*$\\|" page-delimiter)) (setq-local paragraph-start (concat "[ \t\f]*$\\|" page-delimiter)) - (setq font-lock-defaults '(ess-STA-mode-font-lock-defaults nil nil ((?\. . "w"))))) + (setq font-lock-defaults '(ess-STA-mode-font-lock-defaults nil nil ((?\. . "w")))) + (remove-hook 'ess-idle-timer-functions 'ess-synchronize-dirs 'local)) (defalias 'STA-mode 'ess-stata-mode) (defalias 'stata-mode 'ess-stata-mode)