aboutsummaryrefslogtreecommitdiff
path: root/elisp.c
diff options
context:
space:
mode:
authorjixiuf <jixiuf@qq.com>2019-07-12 01:01:04 +0800
committerjixiuf <jixiuf@qq.com>2019-07-12 01:01:04 +0800
commit46233c00713c95ae5647179f8d98426bfa24a736 (patch)
tree7802718dc21e72f1b15af8edaa81b8a0951895d9 /elisp.c
parent2422c3858b6a41c07c12d3c9482dd0d6bb821f84 (diff)
When a command keep print outputs, the buffer can auto scroll now even the vterm window is not activated.
should fix #84
Diffstat (limited to 'elisp.c')
-rw-r--r--elisp.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/elisp.c b/elisp.c
index 30e8a52..5cb5bdf 100644
--- a/elisp.c
+++ b/elisp.c
@@ -77,6 +77,12 @@ void delete_lines(emacs_env *env, int linenum, int count, bool del_whole_line) {
void recenter(emacs_env *env, emacs_value pos) {
env->funcall(env, Frecenter, 1, (emacs_value[]){pos});
}
+emacs_value point(emacs_env *env) { return env->funcall(env, Fpoint, 0, NULL); }
+
+void set_window_point(emacs_env *env, emacs_value win, emacs_value point) {
+ env->funcall(env, Fset_window_point, 2, (emacs_value[]){win, point});
+}
+
bool eq(emacs_env *env, emacs_value e1, emacs_value e2) {
emacs_value Qeq = env->funcall(env, Feq, 2, (emacs_value[]){e1, e2});
return env->is_not_nil(env, Qeq);