Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
27024d2f
Commit
27024d2f
authored
Aug 26, 2005
by
Romain Francoise
Browse files
(sgml-validate): Use `compilation-start'
instead of the obsolete `compile-internal'.
parent
a6022f15
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
7 additions
and
2 deletions
+7
-2
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/textmodes/sgml-mode.el
lisp/textmodes/sgml-mode.el
+2
-2
No files found.
lisp/ChangeLog
View file @
27024d2f
2005-08-26 Romain Francoise <romain@orebokech.com>
* textmodes/sgml-mode.el (sgml-validate): Use `compilation-start'
instead of the obsolete `compile-internal'.
2005-08-26 Juanma Barranquero <lekktu@gmail.com>
* smerge-mode.el (smerge-refined-change): Add :group.
...
...
lisp/textmodes/sgml-mode.el
View file @
27024d2f
...
...
@@ -901,7 +901,7 @@ With prefix argument ARG, repeat this ARG times."
(
forward-list
)))))))
(
autoload
'compil
e-internal
"compile"
)
(
autoload
'compil
ation-start
"compile"
)
(
defun
sgml-validate
(
command
)
"Validate an SGML document.
...
...
@@ -919,7 +919,7 @@ and move to the line in the SGML document that caused it."
(
file-name-nondirectory
name
))))))))
(
setq
sgml-saved-validate-command
command
)
(
save-some-buffers
(
not
compilation-ask-about-save
)
nil
)
(
compil
e-internal
command
"No more errors"
))
(
compil
ation-start
command
))
(
defsubst
sgml-at-indentation-p
()
"Return true if point is at the first non-whitespace character on the line."
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment