Artem Shvorin wrote: : После перехода на mule обнаружил следующий глюк: функции : sml-user-{forward,backward}-sexp (это аналоги {forward,backward}-sexp, : заточенные под sml-ный синтаксис) снимают пометку блока : (set-mark-command), [skip] : : Какие есть предложения, как с этим бороться? : Добавить в этих финкциях к параметрам вызова `(intercactive)' флаг "_". Если interactive уже имеет параметры, то добавлять нужно в начало параметров. Например: (defun some-function () ; (interactive) ;; так пометка с блока будет сниматься (interactive "_") ;; а так -- не будет ; некоторая полезная работа ) Второй пример: (defun some-function (buff) ; (interactive "bEnter buffer name: ") ;; так пометка с блока ;; будет сниматься (interactive "_bEnter buffer name: ") ;; а так -- не будет ; некоторая полезная работа ) Подробнее см. `(lispref)Defining Commands' -- Andrew W. Nosenko (awn(a)bcs.zp.ua)