XPost: alt.folklore.computers   
   From: ldo@nz.invalid   
      
   On Wed, 31 Dec 2025 01:01:45 GMT, Charlie Gibbs wrote:   
      
   >> Ah, LISP, the only language composed entirely of randomly spaced   
   >> brackets :-)   
   >   
   > Lots of Irritating Spurious Parentheses   
      
   It is possible to keep things quite readable, with judicious use of   
   indentation and suitable marking of closing parenthese, e.g.   
      
   (defun convert-to-region-codes (beg end)   
       "converts alphabetic characters in the selection to “region indicator   
   symbols”."   
       (interactive "*r")   
       (unless (use-region-p)   
           (ding)   
           (keyboard-quit)   
       ) ; unless   
       (let   
           (   
               deactivate-mark   
               (intext (delete-and-extract-region beg end))   
               c   
           )   
           (dotimes (i (- end beg))   
               (setq c (elt intext i))   
               (cond   
                   ((and (>= c ?A) (<= c ?Z))   
                       (setq c (+ (- c ?A) #x1F1E6))   
                   )   
                   ((and (>= c ?a) (<= c ?z))   
                       (setq c (+ (- c ?a) #x1F1E6))   
                   )   
               ) ; cond   
               (insert-char c)   
           ) ; dotimes   
       ) ; let   
   ) ; convert-to-region-codes   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)