Adding a hook to sql-mode?

Adding a hook to sql-mode?

[Webb S.]

Sorry for the slightly tweaked repost, but I am hoping to fix this
before I forget about it...

If I open schema.sql I get funky indentation, where emacs changes my
tabs to a mix of spaces etc.  I can fix this by running the following
in the eval (alt-:) buffer once I have opened a sql file (say
"schema.sql"):

(define-key sql-mode-map (kbd "TAB") 'self-insert-command)
(define-key sql-mode-map (kbd "RET") 'newline-and-indent)
(setq-default default-tab-width 4)

How can I run this as a hook so it always works for sql mode?  I tried
the following to no avail:

(add-hook 'sql-mode-hook
        (lambda()
          (define-key sql-mode-map (kbd "TAB") 'self-insert-command)))

By "to no avail" I mean that when I open foo.sql, <tab> does its
normal weird behavior of lining up with the end of the first word,
inserting spaces in order to do this (yuck!).  Once I run the above
define-key commands from "eval" (alt-:), it behaves how I want, but I
can't get the hook to be installed (I think).

Thx!

Re: Adding a hook to sql-mode?

[Chetan]

"Webb S." <webb.sprague@gmail.com> writes:

> Sorry for the slightly tweaked repost, but I am hoping to fix this
> before I forget about it...
>
> If I open schema.sql I get funky indentation, where emacs changes my
> tabs to a mix of spaces etc.  I can fix this by running the following
> in the eval (alt-:) buffer once I have opened a sql file (say
> "schema.sql"):
>
> (define-key sql-mode-map (kbd "TAB") 'self-insert-command)
> (define-key sql-mode-map (kbd "RET") 'newline-and-indent)
> (setq-default default-tab-width 4)
>
> How can I run this as a hook so it always works for sql mode?  I tried
> the following to no avail:
>
> (add-hook 'sql-mode-hook
>         (lambda()
>           (define-key sql-mode-map (kbd "TAB") 'self-insert-command)))
>
> By "to no avail" I mean that when I open foo.sql, <tab> does its
> normal weird behavior of lining up with the end of the first word,
> inserting spaces in order to do this (yuck!).  Once I run the above
> define-key commands from "eval" (alt-:), it behaves how I want, but I
> can't get the hook to be installed (I think).
>
> Thx!

Looks like what you are looking for is indent with hard tabs with tab
width of 4. The following in the mode hook will do this.

	 (setq indent-tabs-mode t
	       tab-width 4)

You don't need to redefine TAB key then.

Re: Adding a hook to sql-mode?

[Webb S.]

> Looks like what you are looking for is indent with hard tabs with tab
> width of 4. The following in the mode hook will do this.
>
>          (setq indent-tabs-mode t
>                tab-width 4)
>
> You don't need to redefine TAB key then.

Could you show me how to write the add-hook for that?  I think that is
where my problem is, not in the command.  Yours is probably better,
but mine works if I eval it once the file is open.

Thx

Re: Adding a hook to sql-mode?

[Chetan]

"Webb S." <webb.sprague@gmail.com> writes:

>> Looks like what you are looking for is indent with hard tabs with tab
>> width of 4. The following in the mode hook will do this.
>>
>>          (setq indent-tabs-mode t
>>                tab-width 4)
>>
>> You don't need to redefine TAB key then.
>
> Could you show me how to write the add-hook for that?  I think that is
> where my problem is, not in the command.  Yours is probably better,
> but mine works if I eval it once the file is open.
>
> Thx

If you are having difficulty with add-hook, setup file local
variables. M-x info will be your friend there.

Re: Adding a hook to sql-mode?

[Ian Eure]

On Dec 8, 2008, at 9:40 PM, Webb S. wrote:

>
>> Looks like what you are looking for is indent with hard tabs with tab
>> width of 4. The following in the mode hook will do this.
>>
>>          (setq indent-tabs-mode t
>>                tab-width 4)
>>
>> You don't need to redefine TAB key then.
>
> Could you show me how to write the add-hook for that?  I think that is
> where my problem is, not in the command.  Yours is probably better,
> but mine works if I eval it once the file is open.
>

(add-hook 'sql-mode-hook '(lambda () (setq indent-tabs-mode t tab- 
width 4)))

  - Ian

Re: Adding a hook to sql-mode?

[Webb S.]

>
> (add-hook 'sql-mode-hook '(lambda () (setq indent-tabs-mode t tab-
> width 4)))

As a final followup:  this works great to add the hook, but it didn't
get the simple tab inserting behavior I wanted (still lined up the
cursor with the end of the word above it) so I did the following:

(add-hook 'sql-mode-hook '(lambda () (define-key sql-mode-map (kbd
"TAB") 'self-insert-command)))

And it works now

Thanks to everyone!