x11-wm/stumpwm.stumpwm
1
0
Fork 0
mirror of https://github.com/stumpwm/stumpwm.git synced 2026-09-10 07:26:20 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

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

Browse source
This commit is contained in:
Shawn Betts 2007-10-06 18:32:47 -07:00
parent 93bbd4ec0f
commit 83d8913f73
3 changed files with 5 additions and 57 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
autogen.sh Executable file
View file

@ -0,0 +1,5 @@
#!/bin/sh
# generate the configure script
autoconf

19
stumpwm.clisp
View file

@ -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)

38
stumpwm.sbcl
View file

@ -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)