iskm/learnxinyminutes-docs
1
0
Fork 0
mirror of https://github.com/adambard/learnxinyminutes-docs.git synced 2024-12-24 10:01:38 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Merge pull request #3498 from leliamesteban/patch-1

Browse Source 
[elisp/en] t evaluates to itself, so it doesn't need to be quoted
This commit is contained in:
Divay Prakash 2019-03-21 00:54:32 +05:30 committed by GitHub
commit a8e3a04614
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
elisp.html.markdown
View File

@ -281,7 +281,7 @@ filename: learn-emacs-lisp.el
;; should stop searching at some point in the buffer, and whether it ;; should stop searching at some point in the buffer, and whether it
;; should silently fail when nothing is found: ;; should silently fail when nothing is found:
;; (search-forward "Hello" nil 't) does the trick: ;; (search-forward "Hello" nil t) does the trick:
;; The `nil' argument says: the search is not bound to a position. ;; The `nil' argument says: the search is not bound to a position.
;; The `'t' argument says: silently fail when nothing is found. ;; The `'t' argument says: silently fail when nothing is found.
@ -295,7 +295,7 @@ filename: learn-emacs-lisp.el
(mapcar 'hello list-of-names) (mapcar 'hello list-of-names)
(goto-char (point-min)) (goto-char (point-min))
;; Replace "Hello" by "Bonjour" ;; Replace "Hello" by "Bonjour"
(while (search-forward "Hello" nil 't) (while (search-forward "Hello" nil t)
(replace-match "Bonjour")) (replace-match "Bonjour"))
(other-window 1)) (other-window 1))
@ -306,7 +306,7 @@ filename: learn-emacs-lisp.el
(defun boldify-names () (defun boldify-names ()
(switch-to-buffer-other-window "*test*") (switch-to-buffer-other-window "*test*")
(goto-char (point-min)) (goto-char (point-min))
(while (re-search-forward "Bonjour \\(.+\\)!" nil 't) (while (re-search-forward "Bonjour \\(.+\\)!" nil t)
(add-text-properties (match-beginning 1) (add-text-properties (match-beginning 1)
(match-end 1) (match-end 1)
(list 'face 'bold))) (list 'face 'bold)))