A demo exploring emacs vector capablities
Emacs Lisp
Fetching latest commit…
Cannot retrieve the latest commit at this time.
Permalink
Failed to load latest commit information.
README.md
screenshot.png
svg-thing.el

README.md

svg-thing

An interactive demo exploring emacs vector capablities.

screenshot

(Not really) Installation:

  • Copy this code
    (progn
      (setq package-user-dir
            (concat temporary-file-directory "tempelpa"))
      (setq package-archives
            '(("melpa" . "http://melpa.milkbox.net/packages/")))
      (package-initialize)
      (package-refresh-contents)
      (package-install 'es-lib)
      (require 'es-lib)
      (with-current-buffer
      (url-retrieve-synchronously
           "https://raw.githubusercontent.com/sabof/svg-thing/master/svg-thing.el")
        (goto-char (point-min))
        (search-forward "\n\n")
        (delete-region (point-min) (point))
        (eval-buffer))
      (svg-thing)
      (setq-default
       mode-line-format nil)
      (tool-bar-mode -1)
      (menu-bar-mode -1)
      (scroll-bar-mode -1)
      (delete-other-windows))
  • Run "emacs -Q"
  • M-: C-y RET

Instructions:

  • Start: M-x svg-thing
  • Add node: middle-click or Ctrl + left-click
  • Move node: left-click and drag
  • Delete node: right click
  • Reset: g
  • Save: M-x write-file