diff options
| author | LLLL Colonq <llll@colonq> | 2025-09-16 01:34:52 -0400 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2025-09-16 01:34:59 -0400 |
| commit | 510608fdbc43947391d82c703370814aa57a454e (patch) | |
| tree | 57c35f47ed5b2ce0c7eaa2a2553b0e39131475d5 /src/gizmo/wasp-dna.el | |
| parent | fe903c535211bdbeeb703e06db0da3f7c8c19b4b (diff) | |
Update
Diffstat (limited to 'src/gizmo/wasp-dna.el')
| -rw-r--r-- | src/gizmo/wasp-dna.el | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/src/gizmo/wasp-dna.el b/src/gizmo/wasp-dna.el index 4418e3ab..5c8f19a5 100644 --- a/src/gizmo/wasp-dna.el +++ b/src/gizmo/wasp-dna.el @@ -32,9 +32,13 @@ (defun w/dna-user-log (user) "Return a complete log of every message sent by USER." - (--filter - (s-equals? (s-downcase (car it)) user) - (w/dna-complete-log))) + (cond + ((s-equals? user "fake_test_user") + (-repeat 100 (cons "fake_test_user" "hello i'm the test user haha i love apples and oranges"))) + (t + (--filter + (s-equals? (s-downcase (car it)) (s-downcase user)) + (w/dna-complete-log))))) (defun w/dna-generate-from-logs (user) "Generate DNA from historical logs for USER. |
