Maybe next week, we'll see!

On Mon, Nov 14, 2022, 22:23 Emanuel Berg <in...@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