emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/telephone-line bc6075462f 185/195: Fix examples for teleph


From: ELPA Syncer
Subject: [nongnu] elpa/telephone-line bc6075462f 185/195: Fix examples for telephone-line-defsegment
Date: Wed, 5 Jan 2022 03:00:04 -0500 (EST)

branch: elpa/telephone-line
commit bc6075462fa7a72341d036bc4b6fe32c5b668b0b
Author: Sahil Kang <sahil.kang@asilaycomputing.com>
Commit: Sahil Kang <sahil.kang@asilaycomputing.com>

    Fix examples for telephone-line-defsegment
    
    These examples were missing the arglist to the
    `telephone-line-defsegment` macro, resulting in a `Malformed arglist`
    error being signalled:
    
    ```lisp
    (macroexpand-1
     (macroexpand-1
      '(telephone-line-defsegment s1 "Oh,")))
    
    ;; => (defun s1 (lambda (face) (telephone-line-raw "Oh,")))
    ```
---
 configuration.org |  2 +-
 examples.org      | 22 +++++++++++-----------
 2 files changed, 12 insertions(+), 12 deletions(-)

diff --git a/configuration.org b/configuration.org
index c1ea126e63..40499a40c6 100644
--- a/configuration.org
+++ b/configuration.org
@@ -93,7 +93,7 @@ kinda... Not well defined at the moment, but I'll try to 
clear it up.
 Here's an example of a static segment:
 
 #+begin_src emacs-lisp
-(telephone-line-defsegment my-meme-segment
+(telephone-line-defsegment my-meme-segment ()
   "Meme")
 #+end_src
 
diff --git a/examples.org b/examples.org
index daca49a14c..6b113b9b74 100644
--- a/examples.org
+++ b/examples.org
@@ -124,17 +124,17 @@ maps every symbol to itself.
         (accent . (telephone-line-accent-active . 
telephone-line-accent-inactive))
         (nil . (mode-line . mode-line-inactive))))
 
-(telephone-line-defsegment s1 "Oh,")
-(telephone-line-defsegment s2 "telephone")
-(telephone-line-defsegment s3 "line,")
-(telephone-line-defsegment s4 "Give")
-(telephone-line-defsegment s5 "me")
-(telephone-line-defsegment s6 "some")
-(telephone-line-defsegment s7 "time,")
-(telephone-line-defsegment s8 "I'm")
-(telephone-line-defsegment s9 "living")
-(telephone-line-defsegment s10 "in")
-(telephone-line-defsegment s11 "twilight")
+(telephone-line-defsegment s1 () "Oh,")
+(telephone-line-defsegment s2 () "telephone")
+(telephone-line-defsegment s3 () "line,")
+(telephone-line-defsegment s4 () "Give")
+(telephone-line-defsegment s5 () "me")
+(telephone-line-defsegment s6 () "some")
+(telephone-line-defsegment s7 () "time,")
+(telephone-line-defsegment s8 () "I'm")
+(telephone-line-defsegment s9 () "living")
+(telephone-line-defsegment s10 () "in")
+(telephone-line-defsegment s11 () "twilight")
 
 (setq telephone-line-lhs
       '((red . (s1))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]