Skip to content

Commit d57b393

Browse files
jeffvalkcap10morgan
authored andcommitted
[Fix #1486] Complete a partial fix in stacktrace font-locking.
Update stack frame buttons to use `font-lock-face`. Create a button type that respects `font-lock-face`. By default, buttons use `'face`.
1 parent dd1871a commit d57b393

File tree

3 files changed

+7
-1
lines changed

3 files changed

+7
-1
lines changed

CHANGELOG.md

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -13,6 +13,7 @@
1313
* [#1475](https://github.com/clojure-emacs/cider/pull/1475): Fix `args-out-of-range` error in `cider--get-symbol-indent`.
1414
* [#1479](https://github.com/clojure-emacs/cider/pull/1479): Make paredit and `cider-repl-mode` play nice.
1515
* [#1452](https://github.com/clojure-emacs/cider/issues/1452): Prevent ANSI color overlays in the REPL buffer from being extended.
16+
* [#1486](https://github.com/clojure-emacs/cider/issues/1486): Complete a partial fix in stacktrace font-locking.
1617

1718
## 0.10.0 / 2015-12-03
1819

cider-stacktrace.el

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -497,7 +497,8 @@ This associates text properties to enable filtering and source navigation."
497497
'flags flags 'follow-link t
498498
'action 'cider-stacktrace-navigate
499499
'help-echo "View source at this location"
500-
'face 'cider-stacktrace-face)
500+
'font-lock-face 'cider-stacktrace-face
501+
'type 'cider-plain-button)
501502
(save-excursion
502503
(let ((p4 (point))
503504
(p1 (search-backward " "))

cider-util.el

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -269,6 +269,10 @@ Unless you specify a BUFFER it will default to the current one."
269269
"Font-lock STRING as Clojure code."
270270
(cider-font-lock-as 'clojure-mode string))
271271

272+
;; Button allowing use of `font-lock-face', ignoring any inherited `face'
273+
(define-button-type 'cider-plain-button
274+
'face nil)
275+
272276
;;; Colors
273277

274278
(defun cider-scale-color (color scale)

0 commit comments

Comments
 (0)