Adding installer script

2025-10-30 18:17:19 +01:00
parent 756deba83e
commit 8f7dcf3534
3 changed files with 49 additions and 3 deletions
@@ -34,6 +34,7 @@ void initBuiltins() {
 }

 void initEditor() {
+  char init_file_path[256];
  E.cursor_x = 0;
  E.cursor_y = 0;
  E.rx = 0;
@@ -53,8 +54,10 @@ void initEditor() {

  E.number_of_keybinds = 0;

-  
-  E.fd_init_file = fopen("config/init.lisp", "r");
+  strcat(init_file_path, getenv("HOME"));
+  strcat(init_file_path, "/.beluga/config/init.lisp");
+  printf("%s\n", init_file_path);
+  E.fd_init_file = fopen(init_file_path, "r");
  E.ctx = lisp_init();
  E.env = lisp_env(E.ctx);
  lisp_lib_load(E.ctx);