Skip to content

Commit e40c1ce

Browse files
committed
doesn'n show-trailing-whitespace in racket-repl
1 parent e223560 commit e40c1ce

File tree

1 file changed

+10
-6
lines changed

1 file changed

+10
-6
lines changed

emacstuff.org

+10-6
Original file line numberDiff line numberDiff line change
@@ -831,6 +831,10 @@
831831
(global-set-key (kbd "C-c n") 'jx-cleanup-buffer)
832832

833833
(setq-default show-trailing-whitespace t)
834+
835+
(dolist (mode '(racket-repl-mode))
836+
(add-hook (intern (format "%s-hook" mode))
837+
(lambda () (setq-local show-trailing-whitespace nil))))
834838
#+end_src
835839
* Power Lisp
836840
#+begin_src emacs-lisp
@@ -938,15 +942,15 @@
938942

939943
(global-set-key (kbd "C-;") 'comment-dwim)
940944
#+end_src
941-
* Specific settings
942-
#+begin_src emacs-lisp
943-
(defvar emacstuff--user-settings-file (emacstuff-file (concat (user-login-name) ".org")))
944-
(when (file-exists-p emacstuff--user-settings-file)
945-
(org-babel-load-file emacstuff--user-settings-file))
946-
#+end_src
947945
* Aliases
948946
#+begin_src emacs-lisp
949947
(defalias 'list-buffers 'ibuffer)
950948
(defalias 'jx-remove-duplicates 'jx-uniquify-all-lines-buffer)
951949
(defalias 'yes-or-no-p 'y-or-n-p)
952950
#+end_src
951+
* Specific settings
952+
#+begin_src emacs-lisp
953+
(defvar emacstuff--user-settings-file (emacstuff-file (concat (user-login-name) ".org")))
954+
(when (file-exists-p emacstuff--user-settings-file)
955+
(org-babel-load-file emacstuff--user-settings-file))
956+
#+end_src

0 commit comments

Comments
 (0)