diff options
| -rw-r--r-- | vterm-module.c | 33 | ||||
| -rw-r--r-- | vterm.el | 11 |
2 files changed, 23 insertions, 21 deletions
diff --git a/vterm-module.c b/vterm-module.c index 17cb14f..7c93fa7 100644 --- a/vterm-module.c +++ b/vterm-module.c @@ -203,7 +203,8 @@ static void refresh_screen(Term *term, emacs_env *env) { // Term height may have decreased before `invalid_end` reflects it. int line_start = row_to_linenr(term, term->invalid_start); goto_line(env, line_start); - delete_lines(env, line_start, term->invalid_end - term->invalid_start, true); + delete_lines(env, line_start, term->invalid_end - term->invalid_start, + true); refresh_lines(term, env, term->invalid_start, term->invalid_end, width); } @@ -320,9 +321,9 @@ static void term_redraw(Term *term, emacs_env *env) { env->extract_integer(env, buffer_line_number(env)) - bufline_before; adjust_topline(term, env, line_added); } - if(term->is_title_changed){ - set_title(env,env->make_string(env, term->title,strlen(term->title))); - term->is_title_changed=false; + if (term->is_title_changed) { + set_title(env, env->make_string(env, term->title, strlen(term->title))); + term->is_title_changed = false; } term->is_invalidated = false; } @@ -357,16 +358,16 @@ static bool is_key(unsigned char *key, size_t len, char *key_description) { return (len == strlen(key_description) && memcmp(key, key_description, len) == 0); } -static void term_set_title(Term *term ,char* title) { - size_t len=strlen(title); - if (term->title){ +static void term_set_title(Term *term, char *title) { + size_t len = strlen(title); + if (term->title) { free(term->title); } - term->title=malloc(sizeof(char) * (len+1)); - strncpy(term->title ,title,len); - term->title[len]=0; - term->is_title_changed=true; - return ; + term->title = malloc(sizeof(char) * (len + 1)); + strncpy(term->title, title, len); + term->title[len] = 0; + term->is_title_changed = true; + return; } static int term_settermprop(VTermProp prop, VTermValue *val, void *user_data) { @@ -378,7 +379,7 @@ static int term_settermprop(VTermProp prop, VTermValue *val, void *user_data) { term->cursor.visible = val->boolean; break; case VTERM_PROP_TITLE: - term_set_title(term,val->string); + term_set_title(term, val->string); break; case VTERM_PROP_CURSORBLINK: term->cursor.blinking = val->boolean; @@ -560,9 +561,9 @@ static void term_finalize(void *object) { for (int i = 0; i < term->sb_current; i++) { free(term->sb_buffer[i]); } - if (term->title){ + if (term->title) { free(term->title); - term->title=NULL; + term->title = NULL; } free(term->sb_buffer); @@ -596,7 +597,7 @@ static emacs_value Fvterm_new(emacs_env *env, ptrdiff_t nargs, term->cursor.visible = true; term->cursor.blinking = false; term->title = NULL; - term->is_title_changed=false; + term->is_title_changed = false; return env->make_user_ptr(env, term_finalize, term); } @@ -264,8 +264,10 @@ Feeds the size change to the virtual terminal." (defun vterm--delete-lines (line-num count &optional delete-whole-line) - "Delete lines from line-num. If option ‘kill-whole-line’ is non-nil, - then this command kills the whole line including its terminating newline" + "Delete COUNT lines from LINE-NUM. + + If option DELETE-WHOLE-LINE is non-nil, then this command kills + the whole line including its terminating newline" (save-excursion (when (vterm--goto-line line-num) (delete-region (point) (point-at-eol count)) @@ -274,7 +276,7 @@ Feeds the size change to the virtual terminal." (delete-char 1))))) (defun vterm--goto-line(n) - "If move succ return t" + "Go to line N and return true on success." (goto-char (point-min)) (let ((succ (eq 0 (forward-line (1- n))))) succ)) @@ -284,10 +286,9 @@ Feeds the size change to the virtual terminal." (line-number-at-pos (point-max))) (defun vterm--set-title (title) + "Run the `vterm--set-title-hook' with TITLE as argument." (run-hook-with-args 'vterm-set-title-hook title)) - - (provide 'vterm) ;;; vterm.el ends here |