diff --git a/module2/ressources/rr_org/init.el b/module2/ressources/rr_org/init.el
index 3147926f6631cc15115a2fea7d820c87018c8275..c422d6eb92be31d46ceffe751d285c702c5a9f07 100644
--- a/module2/ressources/rr_org/init.el
+++ b/module2/ressources/rr_org/init.el
@@ -196,6 +196,8 @@ Entered on %U
       A->B
    }\n#+end_src" "<src lang=\"dot\">\n\n</src>"))
 
+(global-set-key (kbd "C-c S-t") 'org-babel-execute-subtree)
+
 (add-hook 'org-babel-after-execute-hook 'org-display-inline-images) 
 (add-hook 'org-mode-hook 'org-display-inline-images)
 (add-hook 'org-mode-hook 'org-babel-result-hide-all)
diff --git a/module2/ressources/rr_org/init.org b/module2/ressources/rr_org/init.org
index a87255478113cd740d234e1f6392ccf1ad850f54..0f4b2aa41e44d5030d2f7f1cd157a957d0d86005 100644
--- a/module2/ressources/rr_org/init.org
+++ b/module2/ressources/rr_org/init.org
@@ -362,7 +362,7 @@ To use this type <B and then TAB. This comes with a session argument
    }\n#+end_src" "<src lang=\"dot\">\n\n</src>"))
 #+end_src
 ** Evaluating whole subtree:                                          :LUKA:
-#+begin_src emacs-lisp
+#+begin_src emacs-lisp :tangle init.el
 (global-set-key (kbd "C-c S-t") 'org-babel-execute-subtree)
 #+end_src
 ** Display images                                                   :ARNAUD: