소스 검색

org-w3m.el: Always deactivate the mark after copying.

Patch from Andy Steward.
Carsten Dominik 16 년 전
부모
커밋
c52ec32582
2개의 변경된 파일4개의 추가작업 그리고 12개의 파일을 삭제
  1. 3 0
      lisp/ChangeLog
  2. 1 12
      lisp/org-w3m.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2009-01-06  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-w3m.el (org-w3m-copy-for-org-mode): Always deactivate the
+	mark after copying.
+
 	* org-agenda.el (org-run-agenda-series): Have series options set
 	when finalizing the agenda.
 

+ 1 - 12
lisp/org-w3m.el

@@ -43,16 +43,6 @@
 (require 'org)
 (declare-function w3m-anchor "ext:w3m-util" (position))
 
-(defgroup org-w3m nil
-  "Transforming the HTML content in w3m buffer with org-mode style."
-  :group 'org)
-
-(defcustom org-w3m-deactivate-mark t
-  "Non-nil means, deactivate mark after copying and region in Org-mode style.
-When nil, keep the region active."
-  :type 'boolean
-  :group 'org-w3m)
-
 (defun org-w3m-copy-for-org-mode ()
   "Copy current buffer content or active region with `org-mode' style links.
 This will encode `link-title' and `link-location' with
@@ -69,8 +59,7 @@ so that it can be yanked into an Org-mode buffer with links working correctly."
       (setq transform-start (region-beginning))
       (setq transform-end (region-end))
       ;; Deactivate mark if current mark is activate.
-      (if org-w3m-deactivate-mark
-          (deactivate-mark)))
+      (if (fboundp 'deactivate-mark) (deactivate-mark)))
     (message "Transforming links...")
     (save-excursion
       (goto-char transform-start)