(unless (looking- ( "[ \]*" ---))
;; 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
(- )
(- )
(-- " \\\")
(unless (looking-at (concat "[ \t]*" hs-c-start-regexp))
;;;;;;;;;;;;;;;;;;;
(goto-char p)
(forward-comment 1)
(skip-chars-forward " \t\n\f")
Alḥamdulillāh rabbil-ʿālamīn!
(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)
(forward-comment 1)
(skip-chars-forward " \t\n\f")
👋 ...👋 ...
Ａｓｓａｌａｍｕａｌａｉｋｕｍ 👋 ...👋 ...
(￣▽￣;)
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 ρ( ^ｏ^)b_♪♪
Anda setuju ke tidak? Jikalau tidak, teh cawan plastik sampah tu telah belah harrrrrrrŕ
(command-history)(find-file) (replace-string "1" "2") .. (rectangle-mark-mode) (insert-parentheses) (find-file) (clear-rectangle)