diff options
| author | David Aspinall | 2007-12-13 22:15:16 +0000 |
|---|---|---|
| committer | David Aspinall | 2007-12-13 22:15:16 +0000 |
| commit | db414967948b2a7c7f08933af9d4de19f3c2f7bb (patch) | |
| tree | c85655b59aab19ad028cf7a3ad6bc911498e823c /lib | |
| parent | 2033f94996af8bae44346ce8257446802029daa4 (diff) | |
holes-skeleton-end-hook: no action if mmm-inside-insert-by-key bound
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/holes.el | 7 |
1 files changed, 4 insertions, 3 deletions
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 " |
