[Lisppaste-cvs] CVS update: lisppaste2/coloring-css.lisp lisppaste2/package.lisp

[Brian Mastenbrook]

Update of /project/lisppaste/cvsroot/lisppaste2
In directory common-lisp.net:/home/bmastenbrook/lisppaste2

Modified Files:
	coloring-css.lisp package.lisp 
Log Message:
Minor changes

Date: Tue Jun  8 08:23:04 2004
Author: bmastenbrook

Index: lisppaste2/coloring-css.lisp
diff -u lisppaste2/coloring-css.lisp:1.1 lisppaste2/coloring-css.lisp:1.2
--- lisppaste2/coloring-css.lisp:1.1	Fri Jun  4 14:23:23 2004
+++ lisppaste2/coloring-css.lisp	Tue Jun  8 08:23:04 2004
@@ -25,6 +25,6 @@
 (defvar *css-background-class* "")
 
 (defun make-background-css (color &key (class *css-background-class*))
-  (format nil ".~A { background-color: ~A; color : inherit; }~:*~:*
-.~A:hover { background-color: ~A; color : inherit; }~%"
+  (format nil ".~A { background-color: ~A; color: WindowText; }~:*~:*
+.~A:hover { background-color: ~A; color: WindowText; }~%"
           class color))


Index: lisppaste2/package.lisp
diff -u lisppaste2/package.lisp:1.6 lisppaste2/package.lisp:1.7
--- lisppaste2/package.lisp:1.6	Thu Jun  3 07:17:58 2004
+++ lisppaste2/package.lisp	Tue Jun  8 08:23:04 2004
@@ -1,4 +1,4 @@
-;;;; $Id: package.lisp,v 1.6 2004/06/03 14:17:58 bmastenbrook Exp $
+;;;; $Id: package.lisp,v 1.7 2004/06/08 15:23:04 bmastenbrook Exp $
 ;;;; $Source: /project/lisppaste/cvsroot/lisppaste2/package.lisp,v $
 
 ;;;; See the LICENSE file for licensing information.
@@ -8,6 +8,7 @@
 (eval-when (:execute :load-toplevel :compile-toplevel)
   (defpackage :lisppaste
       (:use :cl #+sbcl :sb-bsd-sockets :html-encode)
-    (:export :start-lisppaste :join-new-channel :shut-up :un-shut-up :say-help)))
+    (:export :start-lisppaste :join-new-channel :shut-up :un-shut-up :say-help
+             :kill-paste :kill-paste-annotations :kill-paste-annotation)))