martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(generic-mode-set-comments): Accept an empty comment-end.

Browse Source
This commit is contained in:
Stefan Monnier
2004-11-24 15:20:38 +00:00
parent bd0e59f8cf
commit 0e7acedf7b
2 changed files with 16 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
lisp/ChangeLog
View File

@@ -1,8 +1,12 @@
2004-11-24 Stefan Monnier <monnier@iro.umontreal.ca>
* generic.el (generic-mode-set-comments): Accept an empty comment-end.
2004-11-24 Nick Roberts <nickrob@snap.net.nz>
* progmodes/gdb-ui.el (dedicated-switch-to-buffer): New function.
(gdb-ann3, gdb-setup-windows, gdb-restore-windows): Dedicate
gdb-related windows.
(gdb-ann3, gdb-setup-windows, gdb-restore-windows):
Dedicate gdb-related windows.
(gdb-display-buffer): Dedicate gdb-related windows. Don't grab
other frames.
(gdb-reset): Remove dedicated property after debugging.
@@ -48,20 +52,19 @@
(math-comp-simplify, math-comp-simplify-term)
(math-comp-add-string, math-comp-add-string-sel):
Replace variables comp-highlight, comp-buf, comp-base,
comp-height, comp-tag, comp-hpos and comp-vpos by declared
variables.
comp-height, comp-tag, comp-hpos and comp-vpos by declared variables.
2004-11-23 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* cus-start.el (all): Added x-use-old-gtk-file-dialog.
* cus-start.el (all): Add x-use-old-gtk-file-dialog.
* mail/emacsbug.el (report-emacs-bug): Catch error that x-server-vendor
and x-server-version may throw.
2004-11-23 Kim F. Storm <storm@cua.dk>
* subr.el (substitute-key-definition-key): Optimize. Don't
call indirect-function for nil defn (always signals error).
* subr.el (substitute-key-definition-key): Optimize.
Don't call indirect-function for nil defn (always signals error).
* ido.el (ido-read-internal): Fix require-match check when
ido-directory-too-big is set.
@@ -71,8 +74,7 @@
* calc/calc-ext.el (math-read-replacement-list)
(math-read-superscripts): New variables.
(math-read-preprocess-string): New function.
(math-read-expr): Filter input through
math-read-preprocess-string.
(math-read-expr): Filter input through math-read-preprocess-string.
* calc/calc-aent.el (math-read-exprs): Filter input through
math-read-preprocess-string.

8
lisp/generic.el
View File

@@ -289,13 +289,15 @@ Some generic modes are defined in `generic-x.el'."
;; Go through all the comments
(dolist (start comment-list)
(let ((end ?\n) (comstyle ""))
(let ((end nil) (comstyle ""))
;; Normalize
(when (consp start)
(setq end (or (cdr start) end))
(setq start (car start)))
(when (char-valid-p start) (setq start (char-to-string start)))
(when (char-valid-p end) (setq end (char-to-string end)))
(cond
((char-valid-p end) (setq end (char-to-string end)))
((zerop (length end)) (setq end "\n")))
;; Setup the vars for `comment-region'
(if comment-start
@@ -414,5 +416,5 @@ The regexp is highlighted with FACE."
(provide 'generic)
;;; arch-tag: 239c1fc4-1303-48d9-9ac0-657d655669ea
;; arch-tag: 239c1fc4-1303-48d9-9ac0-657d655669ea
;;; generic.el ends here