Revision: 3407 Author: ksprotte URL: http://bknr.net/trac/changeset/3407

squid-access-log2csv small fix

U trunk/projects/bos/tools/squid-access-log2csv

Modified: trunk/projects/bos/tools/squid-access-log2csv =================================================================== --- trunk/projects/bos/tools/squid-access-log2csv 2008-07-02 14:05:55 UTC (rev 3406) +++ trunk/projects/bos/tools/squid-access-log2csv 2008-07-02 14:08:27 UTC (rev 3407) @@ -3,9 +3,8 @@ (use-package :regexp)

(assert (probe-file (first ext:*args*)) nil - "Usage: log.lisp <access.log>") + "Usage: squid-access-log2csv <access.log>")

- (defvar *uri-hash* (make-hash-table :test #'equal)) (defvar *action/codes* nil)