summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/cedet/srecode/compile.el3
-rw-r--r--test/lisp/url/url-file-tests.el4
2 files changed, 3 insertions, 4 deletions
diff --git a/lisp/cedet/srecode/compile.el b/lisp/cedet/srecode/compile.el
index 834cbff6032..80b267b8c23 100644
--- a/lisp/cedet/srecode/compile.el
+++ b/lisp/cedet/srecode/compile.el
@@ -385,8 +385,7 @@ ESCAPE_START and ESCAPE_END are regexps that indicate the beginning
escape character, and end escape character pattern for expandable
macro names.
Optional argument END-NAME specifies the name of a token upon which
-parsing should stop.
-If END-NAME is specified, and the input string"
+parsing should stop."
(let* ((what str)
(end-token nil)
(comp nil)
diff --git a/test/lisp/url/url-file-tests.el b/test/lisp/url/url-file-tests.el
index 45af1bba95d..84b7c3a70b0 100644
--- a/test/lisp/url/url-file-tests.el
+++ b/test/lisp/url/url-file-tests.el
@@ -33,11 +33,11 @@
"Directory for url-file test files.")
(ert-deftest url-file ()
- "Test reading file via file:// URL."
+ "Test reading file via file:/// URL."
(let ((file (expand-file-name "file.txt" url-file-tests-data-directory)))
(should (equal
(with-current-buffer
- (url-file (url-generic-parse-url (concat "file://" file))
+ (url-file (url-generic-parse-url (concat "file:///" file))
#'ignore nil)
(prog1 (buffer-substring (point) (point-max))
(kill-buffer)))