X-Git-Url: http://git.hcoop.net/clinton/website/site/unknownlamer.org.git/blobdiff_plain/2aff8b5c069bbb60c5bc7cf027db464239e3faeb..4a34e11355db6430047ae41237c36be68e72623e:/SCWM.html diff --git a/SCWM.html b/SCWM.html index 489d9a9..cdfbc37 100644 --- a/SCWM.html +++ b/SCWM.html @@ -7,7 +7,10 @@ - + + +

Scheme Your Windows

@@ -107,10 +110,10 @@ I have yet to test the others. If not using system.scwmrc it is use to at least include the bits that enable debugging.

-(define debug #t)
+(define debug #t)
 
-(if debug
-    (begin
+(if debug
+    (begin
       (add-hook! module-loaded-hook display-module-loaded)
       (set! %load-verbosely #t)
       (debug-enable 'debug 'backtrace)
@@ -154,12 +157,12 @@ easier. GDS requires a Guile built with threads to work properly
 (use-modules (ice-9 gds-client)
              (ice-9 threads))
 
-;;; GDS thread (in case it must be killed during debugging, ...)
-(define cke-gds-thread #f)
+;;; GDS thread (in case it must be killed during debugging, ...)
+(define cke-gds-thread #f)
 
-(define (connect-to-debugging-server)
+(define (connect-to-debugging-server)
   (set! cke-gds-thread
-        (call-with-new-thread (lambda () (run-utility))))
+        (call-with-new-thread (lambda () (run-utility))))
   cke-gds-thread)
@@ -175,16 +178,16 @@ running.

interaction with guile.

-(require 'gds)
-(require 'gds-server)
-(require 'gds-scheme)
+(require 'gds)
+(require 'gds-server)
+(require 'gds-scheme)
 
-(defvar guile-scratch-buffer-name "*guile-scratch*"
-  "Name of the Guile evaluation scratch buffer")
+(defvar guile-scratch-buffer-name "*guile-scratch*"
+  "Name of the Guile evaluation scratch buffer")
 
-(defun make-guile-scratch-buffer ()
+(defun make-guile-scratch-buffer ()
   (interactive)
-  (let ((scratch-buf (generate-new-buffer guile-scratch-buffer-name)))
+  (let ((scratch-buf (generate-new-buffer guile-scratch-buffer-name)))
     (switch-to-buffer scratch-buf)
     (scheme-mode)
     (gds-auto-associate-buffer)))
@@ -234,11 +237,11 @@ to it, hint hint).

     
   

 
-
Danielle: well road signs were pissing me off
-Danielle: I took one of them out, but the other haven't followed as
-          planned
+
unknownlamer: online dating is dumb in general 
+emacsen: computer dating rocks. I love computer
+emacsen: I mean I really LOVE computers ;)
 

 
Last Modified:
-    March 13, 2008

+    January 21, 2013

   
 
\ No newline at end of file