i[DEV] Stop if trying to use extended probes without quicklisp, this should be done in a better way one day - reed-alert - Lightweight agentless alerting system for server Err bitreich.org 70 hgit clone git://bitreich.org/reed-alert/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/reed-alert/ URL:git://bitreich.org/reed-alert/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/reed-alert/ bitreich.org 70 1Log /scm/reed-alert/log.gph bitreich.org 70 1Files /scm/reed-alert/files.gph bitreich.org 70 1Refs /scm/reed-alert/refs.gph bitreich.org 70 1Tags /scm/reed-alert/tag bitreich.org 70 1README /scm/reed-alert/file/README.gph bitreich.org 70 1LICENSE /scm/reed-alert/file/LICENSE.gph bitreich.org 70 i--- Err bitreich.org 70 1commit 6a0f459f93cd6c2725f8c1df5699ac4cb7e1d1e3 /scm/reed-alert/commit/6a0f459f93cd6c2725f8c1df5699ac4cb7e1d1e3.gph bitreich.org 70 1parent 6e496d0ce582d7db769a93aa5f582321dc089894 /scm/reed-alert/commit/6e496d0ce582d7db769a93aa5f582321dc089894.gph bitreich.org 70 hAuthor: solene rapenne URL:mailto:solene@dataswamp.org bitreich.org 70 iDate: Fri, 14 Oct 2016 14:45:02 +0200 Err bitreich.org 70 i Err bitreich.org 70 i[DEV] Stop if trying to use extended probes without quicklisp, this should be done in a better way one day Err bitreich.org 70 i Err bitreich.org 70 iDiffstat: Err bitreich.org 70 i M functions.lisp | 1 - Err bitreich.org 70 i M probes-extended.lisp | 4 ++++ Err bitreich.org 70 i Err bitreich.org 70 i2 files changed, 4 insertions(+), 1 deletion(-) Err bitreich.org 70 i--- Err bitreich.org 70 1diff --git a/functions.lisp b/functions.lisp /scm/reed-alert/file/functions.lisp.gph bitreich.org 70 i@@ -1,6 +1,5 @@ Err bitreich.org 70 i (require 'asdf) Err bitreich.org 70 i Err bitreich.org 70 i- Err bitreich.org 70 i (defun color(num1 num2) Err bitreich.org 70 i (format nil "~a[~a;~am" #\Escape num1 num2)) Err bitreich.org 70 i Err bitreich.org 70 1diff --git a/probes-extended.lisp b/probes-extended.lisp /scm/reed-alert/file/probes-extended.lisp.gph bitreich.org 70 i@@ -1,3 +1,7 @@ Err bitreich.org 70 i+(unless (member :quicklisp cl:*features*) Err bitreich.org 70 i+ (format t "quicklisp isn't loaded, you can't use extended probes without quicklisp~%") Err bitreich.org 70 i+ (quit)) Err bitreich.org 70 i+ Err bitreich.org 70 i (ql:quickload :drakma) Err bitreich.org 70 i (ql:quickload :cl-ppcre) Err bitreich.org 70 i Err bitreich.org 70 .