emacs-tangents
[Top][All Lists]
Advanced

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

Re: 2022-11-14 Emacs news


From: Sacha Chua
Subject: Re: 2022-11-14 Emacs news
Date: Mon, 14 Nov 2022 22:53:48 -0500

Maybe next week, we'll see!

On Mon, Nov 14, 2022, 22:23 Emanuel Berg <incal@dataswamp.org> wrote:
@%&#$!

You missed this one:

;;; -*- lexical-binding: t -*-
;;
;; this file:
;;   https://dataswamp.org/~incal/emacs-init/comic-book-insult.el

(require 'seq)

(defun scramble-string (str)
  "Randomize the characters of STR."
  (seq-sort (lambda (_ __) (zerop (random 2))) str) )

(defun comic-book-insult ()
  (interactive)
  (insert (concat (scramble-string "@#$%&") "!")) )

;; (comic-book-insult) ; #$%&@!
;; (comic-book-insult) ; $&#@%!

;; (scramble-string "Sail Ho!") ; oHli!aS

--
underground experts united
https://dataswamp.org/~incal



reply via email to

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