Permalink
Browse files

add autogen.sh. remove stumpwm.sbcl and stumpwm.clisp

  • Loading branch information...
1 parent 93bbd4e commit 83d8913f73959514cf7702ce981aa33793270cc2 @sabetts sabetts committed Oct 7, 2007
Showing with 5 additions and 57 deletions.
  1. +5 −0 autogen.sh
  2. +0 −19 stumpwm.clisp
  3. +0 −38 stumpwm.sbcl
View
@@ -0,0 +1,5 @@
+#!/bin/sh
+
+# generate the configure script
+
+autoconf
View
@@ -1,19 +0,0 @@
-#!/usr/local/bin/clisp -K full
-
-;; Here's a script that runs stumpwm using clisp. You can put it in
-;; your path and run it as a regular program.
-;;
-;; Add a symlink to stumpwm.asd into ~/.asdf-system/ (unless it is already visible to asdf).
-;; You must tell clisp where asdf.lisp is, below.
-;;
-;; If you want stumpwm to load on a specific display use the DISPLAY
-;; environment variable.
-
-;; specify where asdf.lisp is.
-(load "/usr/share/common-lisp/source/asdf/asdf.lisp")
-(push (merge-pathnames #p".asdf-system/" (user-homedir-pathname)) asdf:*central-registry*)
-
-;; Note: The first time stumpwm is loaded it will be compiled. This
-;; could be the reason for the loading delay.
-(asdf:oos 'asdf:load-op :stumpwm)
-(stumpwm:stumpwm)
View
@@ -1,38 +0,0 @@
-#!/usr/bin/env sbcl
-
-;; Here's a script that runs stumpwm using sbcl. You can put it in
-;; your path and run it as a regular program. Make sure you have a
-;; symlink of stumpwm.asd in your ~/.sbcl/systems/ directory or
-;; another directory in asdf:*central-registry* so asdf can find
-;; stumpwm.
-;;
-;; You'll also need to put this in your ~/.sbclrc file so sbcl handles
-;; as a script properly:
-;;
-;; ;;; If the first user-processable command-line argument is a filename,
-;; ;;; disable the debugger, load the file handling shebang-line and quit.
-;; (let ((script (and (second *posix-argv*)
-;; (probe-file (second *posix-argv*)))))
-;; (when script
-;; ;; Handle shebang-line
-;; (set-dispatch-macro-character #\# #\!
-;; (lambda (stream char arg)
-;; (declare (ignore char arg))
-;; (read-line stream)))
-;; ;; Disable debugger
-;; (setf *invoke-debugger-hook*
-;; (lambda (condition hook)
-;; (declare (ignore hook))
-;; ;; Uncomment to get backtraces on errors
-;; ;; (sb-debug:backtrace 20)
-;; (format *error-output* "Error: ~A~%" condition)
-;; (quit)))
-;; (load script)
-;; (quit)))
-;;
-;; If you want stumpwm to load on a specific display use the DISPLAY
-;; environment variable.
-
-(require :asdf)
-(require :stumpwm)
-(stumpwm:stumpwm)

0 comments on commit 83d8913

Please sign in to comment.