Improve emacs support

diff --git a/doc/index.org b/doc/index.org
index bbec1d0..f5d7633 100644 (file)
--- a/doc/index.org
+++ b/doc/index.org
@@ -532,20 +532,22 @@ with this path does not already exist, the function will create a new
 file and open it for editing.
 
 #+begin_src elisp :results none
-(defvar ai-topic-files-directory "/home/user/my-ai-mail-directory/"
-  "Directory where topic files are stored. Set it to directory you want to use.")
 
-(defun ai-new-topic ()
-  "Create and open a topic file in the specified directory."
-  (interactive)
-  (let ((topic (read-string "Enter topic name: ")))
-    (let ((file-path (concat ai-topic-files-directory topic ".org")))
-      (if (not (file-exists-p file-path))
-          (with-temp-file file-path
-            (insert "#+TITLE: " topic "\n\n")))
-      (find-file file-path)
-      (goto-char (point-max))
-      (org-mode))))
+  (defvar alyverkko-topic-files-directory "/home/user/my-ai-mail-directory/"
+    "Directory where topic files are stored.")
+
+  (defun alyverkko-new-topic ()
+    "Create and open a topic file in the specified directory."
+    (interactive)
+    (let ((topic (read-string "Enter topic name: ")))
+      (let ((file-path (concat alyverkko-topic-files-directory topic ".org")))
+        (if (not (file-exists-p file-path))
+            (with-temp-file file-path
+              ))
+        (find-file file-path)
+        (goto-char (point-max))
+        (org-mode))))
+
 #+end_src
 
 ***** Easily signal to AI that problem statement is ready for solving
@@ -606,12 +608,6 @@ Ideas to be possibly implemented in the future:
 
 ** System operation
 
-- Enable model selection per individual inference task, allowing for
-  dynamic adjustment based on task requirements.
-
-- Allow specification of custom prompts for each inference task to
-  tailor interactions precisely.
-
 - Consider implementing a plugin architecture to allow third-party
   developers to extend Älyverkko CLI's functionality with custom
   modules or integrations.