I surely am a moron :)

Thanks, and you were right. 

On Wed, Dec 8, 2010 at 11:19 PM, Gary King <gwking@metabang.com> wrote:

Hi Venkatesan,

I think you've got the parenthesis in the wrong place. Try

(log5:start-sender 'mylog 

(log5:stream-sender :location *error-output*)      ;; <--- added one here

:category-spec '(log5:info)

  :output-spec '(log5:message))                       ;; <-- removed one here

regards,

On Dec 8, 2010, at 10:01 AM, Venkatesan S wrote:

Now, the variable output works fine. But, I hit another bug:

(log5:start-sender 'mylog
(log5:stream-sender :location *error-output*
:category-spec '(log5:info)
  :output-spec '(log5:message)))

When I try to define a sender like the above, I get:

There is no output-specification named NIL. Use defoutput to define output specifications before using them in a sender.
   [Condition of type LOG5::OUTPUT-NOT-FOUND-ERROR]

Restarts:
 0: [RETRY] Retry SLIME REPL evaluation request.
 1: [*ABORT] Return to SLIME's top level.
 2: [TERMINATE-THREAD] Terminate this thread (#<THREAD "repl-thread" RUNNING {1003569571}>)

Backtrace:
  0: (LOG5::BUILD-HANDLE-MESSAGE-FN #<LOG5:STREAM-SENDER MYLOG {1003B542E1}>)
  1: ((SB-PCL::FAST-METHOD INITIALIZE-INSTANCE :AFTER (LOG5:BASIC-SENDER)) #(3 NIL) #<unused argument> #<LOG5:STREAM-SENDER MYLOG {1003B542E1}>)[:EXTERNAL]
  2: ((SB-PCL::EMF INITIALIZE-INSTANCE) #<unused argument> #<unused argument> #<LOG5:STREAM-SENDER MYLOG {1003B542E1}> 5864078772937 12)
  3: ((SB-PCL::FAST-METHOD MAKE-INSTANCE (CLASS)) #<unavailable argument> #<unavailable argument> #<STANDARD-CLASS LOG5:STREAM-SENDER>)[:EXTERNAL]
  4: (LOG5::START-SENDER-FN MYLOG NIL NIL LOG5:STREAM-SENDER)[:EXTERNAL]
  5: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LOG5:START-SENDER 'MYLOG (LOG5:STREAM-SENDER :LOCATION *ERROR-OUTPUT* :CATEGORY-SPEC '(LOG5:INFO+) :OUTPUT-SPEC ...)) #<NULL-LEXENV>)
 --more--

I will try to see what the problem is, but with my limited lisp skills, I might not get too far :)
Thanks for a great piece of code, and your sustained efforts!!

On Wed, Dec 8, 2010 at 10:15 PM, Gary King <gwking@metabang.com> wrote:

Hi Venkatesan,

I just updated github, etc. with the latest changes. Please let me know how they work for you and/or if you have any other comments or suggestions.

thanks,

On Dec 7, 2010, at 12:52 PM, Venkatesan S wrote:

Thanks Gary. You rock :)

On Wed, Dec 8, 2010 at 12:40 AM, Gary King <gwking@metabang.com> wrote:

Hi Venkatesan,

Thanks for your question. You've stumbled on a bug that I've corrected locally but mistakenly failed to update on github.

I'll remedy this later today.

My apologies for my oversite.

regards,

On Dec 7, 2010, at 8:29 AM, Venkatesan S wrote:

Hi,

I am a new user of log5 (and lisp in general). When I tried playing around, I found that log5 has a problem printing variables. For eg, 

>(setf a 15)

>(log-for (info) "a is ~a~%" a)

[after setting up a sender and importing all symbols from log5]

It prints:

3500123556 (INFO) a is A

I expected to see: a is 5

Is there anything I am missing? I tried grokking the source, and tried putting a , before value in the log-for macro like in:

(defmacro log-for (category-spec message &rest args)
  (if (%log-p category-spec)
      `(let ((category (load-time-value
            (update-category-spec nil ',category-spec)
            t)))
     (handle-message
      (category-id category)
      ,message
      ,@args))
      `(,values)))

But this did not help. Can anyone please let me know how to achieve what I want? If it is useful, I am using sbcl 64 bit on Centos 5.5 and the latest clog5 (v0.3.1)

Thanks,
Venkatesan

--
Audentis fortuna juvat

_______________________________________________
log5-devel mailing list
log5-devel@common-lisp.net
http://common-lisp.net/cgi-bin/mailman/listinfo/log5-devel

--

Gary Warren King, metabang.com 
Cell: (413) 559 8738
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM * gwking on twitter

--
Audentis fortuna juvat

--

Gary Warren King, metabang.com 
Cell: (413) 559 8738
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM * gwking on twitter

--
Audentis fortuna juvat

--

Gary Warren King, metabang.com 
Cell: (413) 559 8738
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM * gwking on twitter

--
Audentis fortuna juvat