steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

FUEL: unused function removed

char-rename
Björn Lindqvist 2016-07-02 15:26:41 +02:00
parent 1e7e0e9876
commit ecb462cf29
1 changed files with 0 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
misc/fuel/fuel-debug.el
View File

@ -185,17 +185,6 @@ the debugger."
(when (not (member n ref)) (when (not (member n ref))
(put-text-property 0 (length n) 'font-lock-face face n)))) (put-text-property 0 (length n) 'font-lock-face face n))))
(defun fuel-debug--insert-uses (uses)
(let* ((file (or file fuel-debug--file))
(old (with-current-buffer (find-file-noselect file)
(sort (factor-find-usings t) 'string<)))
(new (sort uses 'string<)))
(when (not (cl-equalp old new))
(fuel-debug--highlight-names old new 'fuel-font-lock-debug-unneeded-vocab)
(newline)
(fuel-debug--insert-vlist "Correct vocabulary list:" new)
new)))
(defun fuel-debug--display-uses (ret) (defun fuel-debug--display-uses (ret)
(when (setq fuel-debug--uses (fuel-debug--uses ret)) (when (setq fuel-debug--uses (fuel-debug--uses ret))
(newline) (newline)