BismillahirRahmaannirRaheem~
(..)
  (unless (looking-at (concat "[ \t]*" hs-c-start-regexp))
  ;; we are in this situation: (example)
  ;; (defun bar ()
  ;;      (foo)
  ;;                ) ; comment
  ;;                 ^
  ;;   the point was here before doing (beginning-of-line)
  ;; here we should advance till the next comment which
  ;; eventually has only white spaces preceding it on the same
  ;; line
  (goto-char p)
(..)
Alḥamdulillāh rabbil-ʿālamīn!
(write-file "~/Uploads/codings/emacs/lisp/samples/comment.html" t)
(yank-from-kill-ring "success" )
(read-only-mode 'toggle)
    (yas-insert-snippet )
(mc/mark-next-like-this 1)
(web-mode)
(find-function 'modus-themes-rotate)
(xah-copy-file-path )
(mc/mark-next-like-this 1)
(mc/mark-next-like-this 1)
(mc/mark-next-like-this 1)
(maximize-window)
(add-dir-local-variable 'dired-mode 'mode 'auto-revert)
(add-dir-local-variable 'dired-mode 'mode 'auto-revert)
(dired "~/soul/Uploads/codings/" )
  (unless (looking-at (concat "[ \t]*" hs-c-start-regexp))
  ;; we are in this situation: (example)
  ;; (defun bar ()
  ;;      (foo)
  ;;                ) ; comment
  ;;                 ^
  ;;   the point was here before doing (beginning-of-line)
  ;; here we should advance till the next comment which
  ;; eventually has only white spaces preceding it on the same
  ;; line
  (goto-char p)
👋 ...👋 ... Assalamualaikum 👋 ...👋 ... qwerty asdfg zxcv tyuiop -= bnm,. hjkl 1234

( ̄▽ ̄;)
👋 ...👋 ... Assalamualaikum

mari kita guna kelp lah mari, mengapa tidak bukan❓️😁 kucing anjing kurap ⁷ ²tidak mandi sudah berapa lama hais ➰ー➰ mesti cuba jangan tidak cuba sekalian masing ²

dah dapat tahu, setelah ambil tahu, bukan makan tahu, beri dan kongsilah semula pengalaman dan pengetahuan tu harr ρ( ^o^)b_♪♪

Anda setuju ke tidak? Jikalau tidak, teh cawan plastik sampah tu telah belah harrrrrrrŕ

waalaikumsalam 👋 👋
 (command-history)(find-file)
(replace-string "1" "2") ..
(rectangle-mark-mode) (insert-parentheses)
(find-file)
(clear-rectangle)