Minor fixes

This commit is contained in:
Carsten Dominik 2009-06-09 12:10:27 +02:00
parent d27d3e5fa6
commit 7d20a088f5
2 changed files with 3 additions and 4 deletions

View File

@ -1385,11 +1385,9 @@ The conversion is made depending of STRING-BEFORE and STRING-AFTER."
(let ((start 0)
(trans '(("\\" . "\\backslash")
("~" . "\\ensuremath{\\sim}")
("^" . "\\ensuremath{\\wedge}")
("<" . "\\ensuremath{<}")
(">" . "\\ensuremath{>}")))
("^" . "\\ensuremath{\\wedge}")))
(rtn ""))
(while (string-match "[\\{}$%&_#~^<>]" string)
(while (string-match "[\\{}$%&_#~^]" string)
(setq char (match-string 0 string))
(if (> (match-beginning 0) 0)
(setq rtn (concat rtn (substring string

View File

@ -8463,6 +8463,7 @@ See also `org-refile-use-outline-path' and `org-completion-use-ido'"
(if (not (bolp)) (newline))
(bookmark-set "org-refile-last-stored")
(org-paste-subtree level)
(if (fboundp 'deactivate-mark) (deactivate-mark))
(run-hooks 'org-after-refile-insert-hook))))
(if regionp
(delete-region (point) (+ (point) region-length))