[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/ietf-drums.el,v
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/ietf-drums.el,v |
Date: |
Mon, 03 Nov 2008 06:05:38 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Miles Bader <miles> 08/11/03 06:05:37
Index: ietf-drums.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/ietf-drums.el,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -b -r1.19 -r1.20
--- ietf-drums.el 6 May 2008 03:55:02 -0000 1.19
+++ ietf-drums.el 3 Nov 2008 06:05:36 -0000 1.20
@@ -123,9 +123,18 @@
(setq c (char-after))
(cond
((eq c ?\")
- (forward-sexp 1))
+ (condition-case err
+ (forward-sexp 1)
+ (error (goto-char (point-max)))))
((eq c ?\()
- (delete-region (point) (progn (forward-sexp 1) (point))))
+ (delete-region
+ (point)
+ (condition-case nil
+ (with-syntax-table (copy-syntax-table
ietf-drums-syntax-table)
+ (modify-syntax-entry ?\" "w")
+ (forward-sexp 1)
+ (point))
+ (error (point-max)))))
(t
(forward-char 1))))
(buffer-string))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/gnus/ietf-drums.el,v,
Miles Bader <=