mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
Fix up previous replace-in-string commit
* lisp/subr.el (replace-in-string): Fix thinko in implementation.
This commit is contained in:
parent
3beb8bc994
commit
0a7152e095
2 changed files with 12 additions and 2 deletions
|
|
@ -450,7 +450,13 @@ See https://debbugs.gnu.org/cgi/bugreport.cgi?bug=19350."
|
|||
(should (equal (replace-in-string "zot" "bar" "barfoozot")
|
||||
"barfoobar"))
|
||||
(should (equal (replace-in-string "z" "bar" "barfoozot")
|
||||
"barfoobarot")))
|
||||
"barfoobarot"))
|
||||
(should (equal (replace-in-string "zot" "bar" "zat")
|
||||
"zat"))
|
||||
(should (equal (replace-in-string "azot" "bar" "zat")
|
||||
"zat"))
|
||||
(should (equal (replace-in-string "azot" "bar" "azot")
|
||||
"bar")))
|
||||
|
||||
(provide 'subr-tests)
|
||||
;;; subr-tests.el ends here
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue