Re: Indenting with spaces rather than tabs

[Robert Thorpe]

wael-zwaiter@gmx.com writes:

> I am having problems with this code
>
> (defun break-comments ()
>   "Break lines when they exceed a specific character length."
>   (setq-local comment-auto-fill-only-comments t))
>
> (defvar dfv-break-comments-state nil)
>
> ;; Cycles line breaking tool
> (defun cycle-break-comments ()
>   "Break comments in programming languages."
>   (interactive)
>
>   (pcase dfv-break-comments-state
>     ;;
>     (1 (setq-local comment-auto-fill-only-comments nil)
>        (auto-fill-mode 0)
>        (setq dfv-break-comments-state 0)
>        (message "%s" "Disable: Break comments"))
>     ;;
>     (_ (setq fill-column 72)
>        (auto-fill-mode)
>        (if (not nil dfv-break-comments-state)
>          (add-hook 'prog-mode-hook #'break-comments)
>        (progn
>          (add-hook 'sh-mode-hook          #'break-comments)
>          (add-hook 'fortran-mode-hook     #'break-comments)
>          (add-hook 'emacs-lisp-mode-hook  #'break-comments)
>          (add-hook 'c-mode-hook           #'break-comments)
>          (add-hook 'c++-mode-hook         #'break-comments)
>          (add-hook 'awk-mode-hook         #'break-comments)
>          (add-hook 'R-mode-hook           #'break-comments)
>          (add-hook 'octave-mode-hook      #'break-comments)))
>        ;;
>        (add-hook 'texinfo-mode-hook  #'break-comments)
>        (add-hook 'text-mode-hook     #'break-comments)
>        ;;
>        (setq dfv-break-comments-state 1)
>        (message "%s" "Break comments using prog-mode-hook")) ))
>
>   ;; Break comments using auto-fill
>   (global-set-key (kbd "H-q") #'cycle-break-comments)

I'm not sure what you're trying to do.

I don't see how your code can cycle things.  You always add this hooks,
and you never take them away.  Also, I think that pcase always runs the
case "_".  I may be wrong, since I don't use it.

BR,
Robert Thorpe