hallvard@IFI.UIO.NO (Hallvard B Furuseth) (06/18/89)
2 small bugs & fixes: texinfo-format-buffer fails to discover duplicate node names. c-indent-line refuses to put case/label statements at the first column. Patches: *** lisp/texinfmt.el~ Fri May 26 10:57:59 1989 --- lisp/texinfmt.el Fri Jun 16 06:52:52 1989 *************** *** 409,413 **** (prev (nth 2 args)) (up (nth 3 args))) - (texinfo-discard-command) (setq texinfo-last-node name) (let ((tem (downcase name))) --- 409,412 ---- *************** *** 414,418 **** (if (assoc tem texinfo-node-names) (error "Duplicate node name: %s" name) ! (setq texinfo-node-names (cons tem texinfo-node-names)))) (or (bolp) (insert ?\n)) --- 413,418 ---- (if (assoc tem texinfo-node-names) (error "Duplicate node name: %s" name) ! (setq texinfo-node-names (cons (list tem) texinfo-node-names)))) ! (texinfo-discard-command) (or (bolp) (insert ?\n)) *** c-mode.el~ Fri Jun 16 06:22:52 1989 --- c-mode.el Wed Apr 19 13:20:36 1989 *************** *** 22,26 **** (forward-sexp 1) (looking-at ":")))) ! (setq indent (max 1 (+ indent c-label-offset)))) ((and (looking-at "else\\b") (not (looking-at "else\\s_"))) --- 22,26 ---- (forward-sexp 1) (looking-at ":")))) ! (setq indent (max 0 (+ indent c-label-offset)))) ((and (looking-at "else\\b") (not (looking-at "else\\s_")))