elisp - Emacs: use add-hook inside function (defun) -

-

if i do 

  (ad-hook 'hascal-mode-hook (lambda (Setq Indent-Tabs-Mode T) (Setting Tab Width 4) (Message "OK")))

In my ~ / .emacs.d / init , then executes (lambda ...) when I enter Haskell-Mode .

However, if I have a function like this: 

  (hook-temode tiered) (Ad-hook hook (Lambda () (Satac Indent) -Tabs-mode temode) (Setac tab-width Twidth) (message "OK"))))

and then later it ~ / .emacs.d / init. Call in el : 

  (my-add-hook 'is Hascale-mode-hook T4)

then nothing happens (Even "OK" message is not displayed). Is add-hook / a special function that can not be used within defun ? I have the per-project settings defined in a separate initialization file that detects the buffer name and adds (lambda () ... which is in the appropriate key mode (in the example above, Haskell Mode ); I want to reduce the vocabulary of code using a thin wrapper like my-add-hook , but I can not tell why < Code> Ad-hook is very difficult.

EDIT1: Explanation D added.

EDIT2: When I try to use my-add- I get the message "File mode Specification error: (zero-variable TMode)" message I hook < / Code>.

This is a simple improvement without the need to know about lexical binding: / P> (Defuse My Ad-hook (hook temode twdth) (ad-hook hook) (lambda () (satac indent tabs-mode, mode) (Set-tab-width, twdth) (Message "OK")))


Comments

Post a Comment

Popular posts from this blog

mysql - How to enter php data into a html multiple select box -

-
I am working on a page that will create a team. I just want to create a selection box which will list all the users of all the users. After that, the user can select more than one friend (i.e. 5) and can send the request to these 5 people to join the team but I am having problems I did this: Select $ sql = "Select i. *, Join * Connect with M * m.id = i.clique_id where adder_id =: id"; $ Stmt = $ db- & gt; Query ($ sql, array ('id' = & gt; $ _SESSION ['id'])); While ($ record = $ stmt-> fetch ()) {$ surname = $ record ['surname']; } and this: & lt; Select multiple = "true" name = "category" well id = "category" name = "category" category = "" & gt; & Lt; Option value = "& lt ;? php echo $ surname ;? & gt;" & Gt; & Lt ;? Php ek $ nickname; ? & Gt; & Lt; / Options & gt; & Lt; / Select & gt; But only a friend's nickname...
Read more

java - Can't add JTree to JPanel of a JInternalFrame -

-
Image
There are two panels in my JInternalframe. I want to add TopPanel to Jtree to nominate another. But I can not add Jaitari to the top of the panel. Please help me in this piece of code: DefaultMutableTreeNode root = new DefaultMutableTreeNode ("deck"); DefaultMutableTreeNode Item Clubs = New DefaultMutableTreeNode ("Club"); AddAllCard (itemClubs); Root.add (itemClubs); DefaultMutableTreeNode item = New DefaultMutableTreeNode ("Diamonds"); AddAllCard (itemDiamonds); Root.add (itemDiamonds); DefaultMutableTreeNode Itemspads = New DefaultMutableTreeNode ("Spades"); AddAllCard (itemSpades); Root.add (itemSpades); DefaultMutableTreeNode item increases = new DefaultMutableTreeNode ("heart"); AddAllCard (itemHearts); Root.add (itemHearts); Default Trimodel Tree Model = New DefaultTreeModel (Route); Tree = new jetty (tree modal); ScrollPane = new JScrollPane (tree); // scrollPane.setViewportView (tree); . ScrollPane.getViewport () add (tr...
Read more

c++ - Cassandra datastax cpp driver - avoiding unnecessary copies -

-
I use the following method to create my insert statement for Cassandra (using datastax cpp driver) : ssStmt1 & lt; & Lt; "Insert some table (...) value (....)" string sStatement1 = ssStmt1.str (); Castestring cass1 = cass_string_init (sStatement1.c_str ()); CassStatement * pStmt1 = cass_statement_new (cass1, 0); I have also tried the following: CassString cass1 = cass_string_init ("Enter some table (id, date, c) value (? ,?,?); "); CassStatement * pStmt1 = cass_statement_new (cass1, 3); Cass_statement_bind_uuid (pStmt1, 0, uuidKey); Cass_statement_bind_int64 (PSTMT1, 1, timestamp); Cass_statement_bind_string (pStmt1, 2, sSomething); The first pattern works with mixed keys, the second is not. The key has a timestamp and a UUID. Timestamp is one of two errors in the field (based on the used bond statement). If bound in this way: cass_statement_bind_int64_by_name (pStmt1, "date", timestamp); I get the following error: Inva...
Read more