emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/org-superstar 61bf289b42 073/162: Removed no longer needed


From: Stefan Kangas
Subject: [nongnu] elpa/org-superstar 61bf289b42 073/162: Removed no longer needed temporary testing file.
Date: Fri, 31 Dec 2021 19:35:27 -0500 (EST)

branch: elpa/org-superstar
commit 61bf289b42f11bd274081802a5263f44a5d53ccc
Author: D. Williams <d.williams@posteo.net>
Commit: D. Williams <d.williams@posteo.net>

    Removed no longer needed temporary testing file.
---
 tests/slomode.el | 42 ------------------------------------------
 1 file changed, 42 deletions(-)

diff --git a/tests/slomode.el b/tests/slomode.el
deleted file mode 100644
index d72f09d17e..0000000000
--- a/tests/slomode.el
+++ /dev/null
@@ -1,42 +0,0 @@
-;; this is a temporary file for testing slowdown issues.
-;; edit the variable test-case to 1 or 2, then run:
-;; emacs -Q -l slomode.el <your sample file>
-;; start the test with ‘M-x slo-mode’.
-(require 'org)
-
-(defvar test-case 1
-  "Check one of several plausible test cases.")
-
-(if (= test-case 1)
-    (setq how-kw 'prepend)
-  (setq how-kw nil))
-
-(setq inhibit-compacting-font-caches nil)
-
-(defface slo-face '((default . nil)) "Sloface")
-
-(defvar slo-keywords
-  `(("^\\**\\(?1:\\*\\) "
-     (1 'slo-face ,how-kw))))
-
-(defun slo-fontify-buffer ()
-  "Fontify the buffer."
-  (when font-lock-mode
-    (save-restriction
-      (widen)
-      (font-lock-ensure)
-      (font-lock-flush))))
-
-;;; Mode commands
-;;;###autoload
-(define-minor-mode slo-mode
-  "Try and slow down the buffer."
-  nil " Slo" nil
-  (cond
-   (slo-mode
-    (font-lock-add-keywords nil slo-keywords
-                            'append)
-    (slo-fontify-buffer))
-   (t
-    (font-lock-remove-keywords nil slo-keywords)
-    (slo-fontify-buffer))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]