diff options
| author | djcb <djcb@djcbsoftware.nl> | 2014-04-27 11:32:21 +0300 |
|---|---|---|
| committer | djcb <djcb@djcbsoftware.nl> | 2014-04-27 11:32:21 +0300 |
| commit | 205de21783bc0c4cc3c572297e5622a574556357 (patch) | |
| tree | a291719c3ea70fe2f7dd88ca4db7a7ce9e2b3a1c /mu4e | |
| parent | 5cf67c6ea9b022c1fd440d30b530d7b5a925cb16 (diff) | |
* make mu4e-view-url-regexp a public variable
thus, users can more easily experiment with this
Diffstat (limited to 'mu4e')
| -rw-r--r-- | mu4e/mu4e-view.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mu4e/mu4e-view.el b/mu4e/mu4e-view.el index 7bab9e2..b374111 100644 --- a/mu4e/mu4e-view.el +++ b/mu4e/mu4e-view.el @@ -157,7 +157,7 @@ The first letter of NAME is used as a shortcut character.") This is to determine what is the parent docid for embedded message extracted at some path.") -(defconst mu4e~view-url-regexp +(defvar mu4e-view-url-regexp "\\(\\(https?\\://\\|mailto:\\)[-+\[:alnum:\].?_$%/+&#@!*~,:;=/()]+\\)" "Regexp that matches http:/https:/mailto: URLs; match-string 1 will contain the matched URL, if any.") @@ -786,7 +786,7 @@ Also number them so they can be opened using `mu4e-view-go-to-url'." (setq mu4e~view-link-map ;; buffer local (make-hash-table :size 32 :weakness nil)) (goto-char (point-min)) - (while (re-search-forward mu4e~view-url-regexp nil t) + (while (re-search-forward mu4e-view-url-regexp nil t) (let* ((url (match-string 0)) (ov (make-overlay (match-beginning 0) (match-end 0)))) (puthash (incf num) url mu4e~view-link-map) |