[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: 2022-11-14 Emacs news
|
From: |
Emanuel Berg |
|
Subject: |
Re: 2022-11-14 Emacs news |
|
Date: |
Tue, 15 Nov 2022 01:29:53 +0100 |
|
User-agent: |
Gnus/5.13 (Gnus v5.13) |
@%&#$!
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