Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 9c35cc1870
Fetching contributors…

Cannot retrieve contributors at this time

21 lines (16 sloc) 0.6 kb
(require 'ansi-color)
(defadvice sldb-insert-frame (around colorize-clj-trace (frame &optional face))
(progn
(ad-set-arg 0 (list (sldb-frame.number frame)
(ansi-color-apply (sldb-frame.string frame))
(sldb-frame.plist frame)))
ad-do-it
(save-excursion
(forward-line -1)
(skip-chars-forward "0-9 :")
(let ((beg-line (point)))
(end-of-line)
(remove-text-properties beg-line (point) '(face nil))))))
(ad-activate #'sldb-insert-frame)
(provide 'slime-frame-colors)
(provide 'slime-frame-colors-a24dd450)
Jump to Line
Something went wrong with that request. Please try again.