Fix problem with sig/struct indenting

2 files changed, 1 insertions, 3 deletions

diff --git a/src/elisp/urweb-mode.el b/src/elisp/urweb-mode.el
index b44ebbb1..1938eeba 100644
--- a/src/elisp/urweb-mode.el
+++ b/src/elisp/urweb-mode.el
@@ -586,8 +586,6 @@ Point should be just before the symbol ORIG-SYM and is not preserved."
   (let ((sym (unless (save-excursion (urweb-backward-arg))
 	       (urweb-backward-spaces)
 	       (urweb-backward-sym))))
-    (if (and (= sym ">") (save-excursion (backward-char 5) (looking-at "</xml")))
-        (setq sym "</xml>"))
     (if (member sym '(";" "d=")) (setq sym nil))
     (if sym (urweb-get-sym-indent sym)
       ;; FIXME: this can take a *long* time !!
diff --git a/src/elisp/urweb-move.el b/src/elisp/urweb-move.el
index d27affa4..da74bcee 100644
--- a/src/elisp/urweb-move.el
+++ b/src/elisp/urweb-move.el
@@ -340,7 +340,7 @@ Returns T if the move indeed moved through one sexp and NIL if not."
 ;;(defun urweb-forward-thing ()
 ;;  (if (= ?w (char-syntax (char-after))) (forward-word 1) (forward-char 1)))
 
-(defun urweb-backward-arg () (interactive) (urweb-backward-sexp 1000))
+(defun urweb-backward-arg () (urweb-backward-sexp 1000))
 (defun urweb-forward-arg () (urweb-forward-sexp 1000))