elisp/emacs-demo.el

   1 ;; Read in the files.
   2
   3 (push "/home/rsp/Documents" load-path)
   4 (require 'cl)
   5 (load-file "prelim.el")
   6 (load-file "honey-redux.el")
   7 (load-file "simple-ui.el")
   8
   9 (global-set-key (kbd "C-c i") 'simple-ui-init)
  10 (global-set-key (kbd "C-c l") 'simple-ui-load)
  11 (global-set-key (kbd "C-c n") 'simple-ui-new)
  12 (global-set-key (kbd "C-c s") 'simple-ui-save)
  13
  14 (set-current-plexus (add-plexus))
  15
  16 (add-nema 0 0 "walrus")
  17 (add-nema 0 0 "mammal")
  18 (add-nema 2 3 nil)
  19 (label-nema 2 "walrus")
  20 (label-nema 3 "mammal")
  21 (label2uid "mammal")
  22 (uid2label 2)
  23 (get-content 2)
  24 (get-source 4)
  25 (get-sink 4)
  26 (uid2label (get-sink 4))
  27 (get-content (label2uid "walrus"))
  28
  29 (download-en-masse)
  30