diff options
| author | Lars Ingebrigtsen | 2020-08-18 23:11:02 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2020-08-18 23:19:09 +0200 |
| commit | 3c76397bbcad361a17087a24ff706f78b6abde3f (patch) | |
| tree | 12c54e26db22e67a95dc1b2918c70199e6c363c9 | |
| parent | 66d8322e034679ef3a05e5747b3a4c7400712a69 (diff) | |
| download | emacs-3c76397bbcad361a17087a24ff706f78b6abde3f.tar.gz emacs-3c76397bbcad361a17087a24ff706f78b6abde3f.zip | |
Remove some compat code from htmlfontify.el
* lisp/htmlfontify.el (hfy-color-vals): color-values is always
defined.
| -rw-r--r-- | lisp/htmlfontify.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/htmlfontify.el b/lisp/htmlfontify.el index 6265537e885..4d653972c95 100644 --- a/lisp/htmlfontify.el +++ b/lisp/htmlfontify.el | |||
| @@ -556,10 +556,7 @@ If a window system is unavailable, calls `hfy-fallback-color-values'." | |||
| 556 | '(1 2 3)) | 556 | '(1 2 3)) |
| 557 | ;;(message ">> %s" color) | 557 | ;;(message ">> %s" color) |
| 558 | (if window-system | 558 | (if window-system |
| 559 | (if (fboundp 'color-values) | 559 | (color-values color) |
| 560 | (color-values color) | ||
| 561 | ;;(message "[%S]" window-system) | ||
| 562 | (x-color-values color)) | ||
| 563 | ;; blarg - tty colors are no good - go fetch some X colors: | 560 | ;; blarg - tty colors are no good - go fetch some X colors: |
| 564 | (hfy-fallback-color-values color)))) | 561 | (hfy-fallback-color-values color)))) |
| 565 | (define-obsolete-function-alias 'hfy-colour-vals #'hfy-color-vals "27.1") | 562 | (define-obsolete-function-alias 'hfy-colour-vals #'hfy-color-vals "27.1") |