Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 29 lines (23 sloc) 0.787 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
;;;; restas-swank.lisp
;;;;
;;;; This file is part of the RESTAS library, released under Lisp-LGPL.
;;;; See file COPYING for details.
;;;;
;;;; Author: Moskvitin Andrey <archimag@gmail.com>

(require 'slime)

;;;; Modules

(defun restas-inspect-module (module)
  "Inspect module."
  (interactive (list (slime-read-package-name "Module: ")))
  (when (not module)
    (error "No module given"))
  (slime-eval-async `(restas.swank:inspect-module ,module) 'slime-open-inspector))

(defun restas-inspect-vhost-list ()
  "Inspect vhost list."
  (interactive)
  (slime-eval-async `(restas.swank:inspect-vhosts) 'slime-open-inspector))

(defun restas-restore-global-context ()
  "Restore default context"
  (interactive)
  (slime-eval '(restas.swank:restore-global-context)))

(provide 'restas)
Something went wrong with that request. Please try again.