diff --git a/examplary-library.el b/examplary-library.el index c8f83cd7b..634e1c827 100644 --- a/examplary-library.el +++ b/examplary-library.el @@ -1,5 +1,9 @@ -(defun examplary-asktutor (broad-topic specific-topic question) - (interactive (list (read-string-hist (concat "asktutor about " (pen-topic t) ": ")))) + + +(defun examplary-asktutor (broader-topic specific-topic question) + (interactive (list + (read-string-hist (concat "(xlr) ask tutor about " (pen-topic t) ": ")) + (read-string-hist (concat "(xlr) ask tutor about " (pen-broader-topic t) ": ")))) (etv (eval `(ci (snc "ttp" (pen-pf-generic-tutor-for-any-topic ,cname ,pname ,question)))))) diff --git a/pen-core.el b/pen-core.el new file mode 100644 index 000000000..f55a4b5c9 --- /dev/null +++ b/pen-core.el @@ -0,0 +1,6 @@ +;; These are helper functions +;; examplary.el uses them +;; So might org-brain + + +(provide 'pen-core) \ No newline at end of file