clean code,remove unused function get_hex_color_fg and get_hex_color_bg

1 files changed, 3 insertions, 8 deletions

diff --git a/elisp.c b/elisp.c
index 3fe511f..951791f 100644
--- a/elisp.c
+++ b/elisp.c
@@ -109,14 +109,9 @@ void set_cursor_type(emacs_env *env, emacs_value QCursorType) {
 }
 
 
-emacs_value get_hex_color_fg(emacs_env *env, emacs_value face) {
-  return env->funcall(env, Fvterm_face_color_hex, 2,
-                      (emacs_value[]){face, Qforeground});
-}
-
-emacs_value get_hex_color_bg(emacs_env *env, emacs_value face) {
-  return env->funcall(env, Fvterm_face_color_hex, 2,
-                      (emacs_value[]){face, Qbackground});
+emacs_value vterm_get_color(emacs_env *env, int index) {
+  emacs_value idx = env->make_integer(env, index);
+  return env->funcall(env, Fvterm_get_color, 1, (emacs_value[]){idx});
 }
 
 void set_title(emacs_env *env, emacs_value string) {