comparison src/elisp/urweb-mode.el @ 364:7c58dc323683

Fix XML indent not to take two tab-tries
author Adam Chlipala <adamc@hcoop.net>
date Thu, 16 Oct 2008 12:55:16 -0400
parents 9d81597e03e8
children dda8f3c6ae7c
comparison
equal deleted inserted replaced
363:9d81597e03e8 364:7c58dc323683
509 (and (looking-at "\\*") (urweb-find-comment-indent)) 509 (and (looking-at "\\*") (urweb-find-comment-indent))
510 510
511 (and (urweb-in-xml) 511 (and (urweb-in-xml)
512 (let ((prev-indent (save-excursion 512 (let ((prev-indent (save-excursion
513 (previous-line 1) 513 (previous-line 1)
514 (end-of-line 1)
514 (re-search-backward "^[^\n]" nil t) 515 (re-search-backward "^[^\n]" nil t)
515 (current-indentation)))) 516 (current-indentation))))
516 (cond 517 (cond
517 ((looking-at "</") 518 ((looking-at "</")
518 (urweb-tag-matching-indent)) 519 (urweb-tag-matching-indent))