[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/arbitools 80b7021 17/29: packages/arbitools.el: minor f
From: |
Stefan Monnier |
Subject: |
[elpa] externals/arbitools 80b7021 17/29: packages/arbitools.el: minor fixes |
Date: |
Sun, 29 Nov 2020 19:00:36 -0500 (EST) |
branch: externals/arbitools
commit 80b702180a054cfff53a341157c849acdea85f7b
Author: David Gonzalez Gandara <dggandara@member.fsf.org>
Commit: David Gonzalez Gandara <dggandara@member.fsf.org>
packages/arbitools.el: minor fixes
---
arbitools.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/arbitools.el b/arbitools.el
index 8c43e78..76fe0bc 100644
--- a/arbitools.el
+++ b/arbitools.el
@@ -273,6 +273,7 @@
(interactive)
(save-excursion
(let ( (numberofrounds (arbitools-number-of-rounds))
+ (pointsstring "")
(points 0.0)
(pointstosum 0.0)
(roundcount 1))
@@ -283,7 +284,7 @@
(while (<= roundcount numberofrounds)
(beginning-of-line)
(forward-char (+ 98 (* (- roundcount 1) 10))) ;; go to where the
result is for each round
- ;; FIXME: Use pcase?
+ (setq pointsstring (thing-at-point 'symbol))
(cond ((string= (thing-at-point 'symbol) "1") (setq pointstosum 1.0))
((string= (thing-at-point 'symbol) "+") (setq pointstosum 1.0))
((string= (thing-at-point 'symbol) "=") (setq pointstosum 0.5))
@@ -309,7 +310,7 @@
(let ((datachunk ""))
(goto-char (point-min))
(while (re-search-forward "^001" nil t)
- (let* () ;; (linestring (thing-at-point 'line))
+ (let* ((linestring (thing-at-point 'line)))
(beginning-of-line)
(forward-char 89) ;; get the POS field
(setq datachunk (thing-at-point 'word))
@@ -410,6 +411,7 @@
(save-excursion
(while (re-search-forward "^013" nil t)
(let* ((linestringteam (thing-at-point 'line))
+ (actualintegrant (string-to-number (substring
linestringteam 40 44)))
(integrantcount 0)
(members 0))
- [elpa] externals/arbitools b61035e 13/29: packages/arbitools.el: Added new functions, (continued)
- [elpa] externals/arbitools b61035e 13/29: packages/arbitools.el: Added new functions, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 16a125c 12/29: packages/arbitools.el: Applied suggestions, improved functions, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools a833441 10/29: * packages/arbitools: Add functions and menus, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 34c912c 20/29: *arbitools.el: Some functions improved, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 7593f76 22/29: arbitools.el: added new function, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 453b572 11/29: packages/arbitools: Added new functions, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 0a079b7 09/29: * packages/arbitools: added menu option, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 97afb42 16/29: * arbitools/arbitools.el: Remove unused vars, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 5f6a9b7 25/29: * packages/arbitools/arbitools.el: Various code tweaks, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 5d87f5b 23/29: arbitools.el: added support for ARPO tiebreak, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 80b7021 17/29: packages/arbitools.el: minor fixes,
Stefan Monnier <=
- [elpa] externals/arbitools d9e940b 06/29: * packages/arbitools.el: fix coding issues, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 6f1383d 15/29: packages/arbitools.el: Fixed some bugs, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 86d5f67 21/29: arbitools.el: Improved functions, fixed bugs, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 00c2fb4 18/29: packages/arbitools.el: Removed unused variables, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools b24fab9 26/29: * packages/arbitools/arbitools.el (arbitools--verbose-output): New function, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools a576ab8 19/29: * arbitools.el: added new functions, updated website, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 45bbc5d 14/29: packages/arbitools.el: Fixed some bugs, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools a333b98 24/29: packages/arbitools/arbitools.el: Fixed bugs in ARPO, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 62fe08e 29/29: * .gitignore: New file, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 8f19a65 27/29: * packages/arbitools/arbitools.el: Applied some suggested code tweaks, Stefan Monnier, 2020/11/29