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

���������� ������� ASCII-������ � PSGML �����������...

=== ~/.emacs ===
(defun sgml-insert-mdash ()
  "Insert \"—\" entity removing already existing dashes."
  (interactive)
  (insert "—")
  (if (looking-at "\\s-*-+\\s-*")
      (progn (kill-region (match-beginning 0) (match-end 0))
	     (insert " ")))
  )

(local-set-key [(control kp-subtract)]
		 'sgml-insert-mdash)
=== ~/.emacs ===

��� ��������� "—" ��� ������� �� Ctrl-GrayMinus, ������ ����
������ ��������� ����� ���-������ ���� " -- �� � ���?", �� ���
����������� � "— �� � ���?". ����� ������.

�������� ������ ��������������� ����������� � My-SGML-keymap ��
.emacs, ������� � http://xtalk.price.ru :)

-- 

����� ���� ������� ���� ��������		// slow constant attack