branch: externals/valign
commit 056138e2a641ba17bd8f69c6ba58f8f153f95e80
Author: Yuan Fu <[email protected]>
Commit: Yuan Fu <[email protected]>
* valign.el (valign--cell-alignment): Fix unused variable.
---
valign.el | 17 ++++++++---------
1 file changed, 8 insertions(+), 9 deletions(-)
diff --git a/valign.el b/valign.el
index 2f1b7d3..6db408c 100644
--- a/valign.el
+++ b/valign.el
@@ -32,15 +32,14 @@ Return 'left if aligned left, 'right if aligned right.
Assumes point is after the left bar (“|”).
Doesn’t check if we are in a cell."
(save-excursion
- (let ((p (point)))
- (if (looking-at " [^ ]")
- 'left
- (if (not (search-forward "|" nil t))
- (signal 'valign-bad-cell nil)
- (if (looking-back
- "[^ ] |" (max (- (point) 3) (point-min)))
- 'right
- (signal 'valign-werid-alignment nil)))))))
+ (if (looking-at " [^ ]")
+ 'left
+ (if (not (search-forward "|" nil t))
+ (signal 'valign-bad-cell nil)
+ (if (looking-back
+ "[^ ] |" (max (- (point) 3) (point-min)))
+ 'right
+ (signal 'valign-werid-alignment nil))))))
;; (if (string-match (rx (seq (* " ")
;; ;; e.g., “5.”, “5.4”
