From db414967948b2a7c7f08933af9d4de19f3c2f7bb Mon Sep 17 00:00:00 2001 From: David Aspinall Date: Thu, 13 Dec 2007 22:15:16 +0000 Subject: holes-skeleton-end-hook: no action if mmm-inside-insert-by-key bound --- lib/holes.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'lib/holes.el') diff --git a/lib/holes.el b/lib/holes.el index 529637bd..b00c2a73 100644 --- a/lib/holes.el +++ b/lib/holes.el @@ -811,9 +811,10 @@ created. Return the number of holes created." "Default hook after a skeleton insertion: put holes at each interesting position." ;; Not all versions of skeleton provide `skeleton-positions' and the ;; corresponding @ operation :-( - (when (boundp 'skeleton-positions) - (dolist (pos skeleton-positions) - (holes-set-make-active-hole pos pos)))) ; put a hole here + (unless (boundp 'mmm-inside-insert-by-key) + (when (boundp 'skeleton-positions) + (dolist (pos skeleton-positions) ;; put holes here + (holes-set-make-active-hole pos pos))))) (defconst holes-jump-doc (concat "Hit \\[holes-set-point-next-hole-destroy] to jump " -- cgit v1.2.3