diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-12-11 10:55:54 +0000 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-12-11 10:55:54 +0000 |
commit | 07d50dde367ebb810a01d54b41bf69406618d1f2 (patch) | |
tree | 056e72556f36748d75807fccacf07555112e86c5 | |
parent | 1de3732868add4ae4a6f698c445bdb9e2ca638bf (diff) |
Some more whitespace
-rw-r--r-- | sx.el | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -197,7 +197,7 @@ Anything before the (sub)domain is removed." (eval-when-compile (concat "\\1" (if (char-displayable-p ?…) "…" "..."))) ;; Remove anything before subdomain. - (replace-regexp-in-string + (replace-regexp-in-string (rx string-start (or (and (0+ word) (optional ":") "//"))) "" url))) @@ -235,7 +235,7 @@ blocks." "Overlays created by sx on this buffer.") (make-variable-buffer-local 'sx--overlays) -(defvar sx--overlay-printing-depth 0 +(defvar sx--overlay-printing-depth 0 "Track how many overlays we're printing on top of each other. Used for assigning higher priority to inner overlays.") (make-variable-buffer-local 'sx--overlay-printing-depth) @@ -264,7 +264,7 @@ Return the result of BODY." (push ov sx--overlays)) result)) -(defvar sx--ascii-replacement-list +(defvar sx--ascii-replacement-list '(("[:space:]" . "") ("àåáâäãåą" . "a") ("èéêëę" . "e") |