🚀 go-pugleaf

GNU Emacs 18.53.11 on NeXT 1.0.1

kill-comment gives an internal error (Wrong type arg) instead of a
user error when there is no comment syntax defined.

Fix is trivial:

(defun kill-comment (arg)
  "Kill the comment on this line, if any.
With argument, kill comments on that many lines starting with this one."
  (interactive "P")
  (barf-if-buffer-read-only)
;;; Add
  (if (null comment-start-skip)
      (error "No comment syntax defined"))
;;; end Add
  (let ((count (prefix-numeric-value arg)))
    (while (> count 0)
      (save-excursion
	(end-of-line)
	(let ((eolpos (point)))
	  (beginning-of-line)
	  (if (re-search-forward comment-start-skip eolpos t)
	      (progn
		(goto-char (match-beginning 0))
		(skip-chars-backward " \t")
		(kill-region (point) eolpos)))))
      (if arg
	  (forward-line 1))
      (setq count (1- count)))))