From mboxrd@z Thu Jan 1 00:00:00 1970 From: Tianxiang Xiong Subject: Bug: Problem with hook added to org-mode-hook [8.2.6 (release_8.2.6-1 @ /usr/local/share/emacs/24.4.50/lisp/org/)] Date: Mon, 14 Jul 2014 01:24:21 -0500 Message-ID: <87ha2kzcdm.fsf@localhost.localdomain.i-did-not-set--mail-host-address--so-tickle-me> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:39165) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1X6a7U-0004ER-3K for emacs-orgmode@gnu.org; Mon, 14 Jul 2014 02:52:20 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1X6a7P-0008Hw-PP for emacs-orgmode@gnu.org; Mon, 14 Jul 2014 02:52:15 -0400 Received: from 24-196-89-117.dhcp.mdsn.wi.charter.com ([24.196.89.117]:38751 helo=localhost.localdomain) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1X6a7P-0008HY-I2 for emacs-orgmode@gnu.org; Mon, 14 Jul 2014 02:52:11 -0400 Received: from localhost.localdomain (localhost.localdomain [127.0.0.1]) by localhost.localdomain (8.14.8/8.14.8) with ESMTP id s6E6RWBq021237 for ; Mon, 14 Jul 2014 01:27:32 -0500 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org Remember to cover the basics, that is, what you expected to happen and what in fact did happen. You don't know how to make a good report? See http://orgmode.org/manual/Feedback.html#Feedback Your bug report will be posted to the Org-mode mailing list. ------------------------------------------------------------------------ I'm organizing my init file as an init.org file that I will then tangle into init.el. I want to define an after-save-hook that applies only to org-mode. I used the following: (add-hook 'org-mode-hook (lambda () (add-hook 'after-save-hook 'tangle-init nil t))) However, when I open my init.org file, I see that the after-save-hook variable is nil. If I manually reapply org-mode, however, it works as expected. Why is it that when I simply open an org file, the hook function is not applied? At least one other individual has been able to reproduce the problem: http://www.reddit.com/r/emacs/comments/2alwnd/hook_for_major_mode/ ------------------------------------------------------------------------ Emacs : GNU Emacs 24.4.50.1 (x86_64-unknown-linux-gnu, GTK+ Version 3.10.9) of 2014-07-08 on localhost.localdomain Package: Org-mode version 8.2.6 (release_8.2.6-1 @ /usr/local/share/emacs/24.4.50/lisp/org/) current state: ============== (setq org-tab-first-hook '(org-hide-block-toggle-maybe org-src-native-tab-command-maybe org-babel-hide-result-toggle-maybe org-babel-header-arg-expand) org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook) org-occur-hook '(org-first-headline-recenter) org-metaup-hook '(org-babel-load-in-session-maybe) org-confirm-shell-link-function 'yes-or-no-p org-after-todo-state-change-hook '(org-clock-out-if-current) org-src-mode-hook '(org-src-babel-configure-edit-buffer org-src-mode-configure-edit-buffer) org-agenda-before-write-hook '(org-agenda-add-entry-text) org-babel-pre-tangle-hook '(save-buffer) org-mode-hook '((lambda nil (add-hook (quote after-save-hook) (quote tangle-init) nil t)) #[nil "\300\301\302\303\304$\207" [org-add-hook change-major-mode-hook org-show-block-all append local] 5] #[nil "\300\301\302\303\304$\207" [org-add-hook change-major-mode-hook org-babel-show-result-all append local] 5] org-babel-result-hide-spec org-babel-hide-all-hashes turn-on-auto-fill #[nil "\300\301\302\303\304$\207" [add-hook after-save-hook tangle-init nil t] 5]) org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point org-babel-execute-safely-maybe) org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers org-cycle-hide-inline-tasks org-cycle-show-empty-lines org-optimize-window-after-visibility-change) org-confirm-elisp-link-function 'yes-or-no-p org-metadown-hook '(org-babel-pop-to-session-maybe) org-clock-out-hook '(org-clock-remove-empty-clock-drawer) )