[nongnu] elpa/pacmacs 7058b61e47 146/472: Implement adding entries to score table (#92)

[ELPA Syncer]

branch: elpa/pacmacs
commit 7058b61e477c1e2e253301cb3bcb966c1ac7fbab
Author: rexim <reximkut@gmail.com>
Commit: rexim <reximkut@gmail.com>

    Implement adding entries to score table (#92)
---
 pacmacs-score.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/pacmacs-score.el b/pacmacs-score.el
index aa07a202d9..202b1c568a 100644
--- a/pacmacs-score.el
+++ b/pacmacs-score.el
@@ -81,6 +81,13 @@
                                      ?\s)
                         score))))))
 
+(defun pacmacs--add-entry-to-score-table (nickname score)
+  (->> (pacmacs--read-score-table)
+       (cons (cons nickname score))
+       (pacmacs--sort-score-table)
+       (-take 10)
+       (pacmacs--write-score-table)))
+
 (provide 'pacmacs-score)
 
 ;;; pacmacs-score.el ends here