noonker

Untitled

Dec 28th, 2019
1,810
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lisp 0.95 KB | None | 0 0
  1. ;; A==============================================================================
  2. (defun controller-get (command &optional arg)
  3.   "This is the main entrypoint for getting code abstraction.
  4.   Given some COMMAND name the actual function is loaded from it's org source
  5.   block in <controller-implementation>.org.
  6.   Pass an optional ARG to have the code block automatically formatted."
  7.   (if (string= controller-implementation "python")
  8.       (controller-python-get command arg)))
  9.  
  10. ;; B==============================================================================
  11. (defun controller-get (command &optional arg)
  12.   "This is the main entrypoint for getting code abstraction.
  13. Given some COMMAND name the actual function is loaded from it's org source
  14. block in <controller-implementation>.org.
  15. Pass an optional ARG to have the code block automatically formatted."
  16.   (if (string= controller-implementation "python")
  17.       (controller-python-get command arg)))
Advertisement