summaryrefslogtreecommitdiff
path: root/lisp/jit-lock.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2005-05-29 08:40:37 +0000
committerRichard M. Stallman <rms@gnu.org>2005-05-29 08:40:37 +0000
commit1f94ceaf650191262aaeaf0a9aaf9bd8e4ad5e1b (patch)
tree1b62ca23ac6708f50ef2481077889e3e553daa1c /lisp/jit-lock.el
parenta1594703887d102b8f64f9672500ee3222a3fc0b (diff)
downloademacs-1f94ceaf650191262aaeaf0a9aaf9bd8e4ad5e1b.tar.gz
(jit-lock-function, jit-lock-after-change): Do nothing if memory is full.
Diffstat (limited to 'lisp/jit-lock.el')
-rw-r--r--lisp/jit-lock.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/jit-lock.el b/lisp/jit-lock.el
index b34e26f74d4..ba2eed9f17e 100644
--- a/lisp/jit-lock.el
+++ b/lisp/jit-lock.el
@@ -298,7 +298,7 @@ Only applies to the current buffer."
"Fontify current buffer starting at position START.
This function is added to `fontification-functions' when `jit-lock-mode'
is active."
- (when jit-lock-mode
+ (when (and jit-lock-mode (not (memory-full-p)))
(if (null jit-lock-defer-time)
;; No deferral.
(jit-lock-fontify-now start (+ start jit-lock-chunk-size))
@@ -540,7 +540,7 @@ is the pre-change length.
This function ensures that lines following the change will be refontified
in case the syntax of those lines has changed. Refontification
will take place when text is fontified stealthily."
- (when jit-lock-mode
+ (when (and jit-lock-mode (not (memory-full-p)))
(save-excursion
(with-buffer-prepared-for-jit-lock
;; It's important that the `fontified' property be set from the