<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
		>
<channel>
	<title>Comments on: Enhancing Emacs’ SQL Mode</title>
	<atom:link href="http://atomized.org/2008/10/enhancing-emacs%e2%80%99-sql-mode/feed/" rel="self" type="application/rss+xml" />
	<link>http://atomized.org/2008/10/enhancing-emacs%e2%80%99-sql-mode/</link>
	<description>Fragmenting reality.</description>
	<lastBuildDate>Fri, 12 Mar 2010 20:46:19 +0000</lastBuildDate>
	<generator>http://wordpress.org/?v=2.9</generator>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
		<item>
		<title>By: Using sql-mode or db-mode with multiple databases &#171; A Curious Programmer</title>
		<link>http://atomized.org/2008/10/enhancing-emacs%e2%80%99-sql-mode/comment-page-1/#comment-131943</link>
		<dc:creator>Using sql-mode or db-mode with multiple databases &#171; A Curious Programmer</dc:creator>
		<pubDate>Sat, 06 Jun 2009 13:21:57 +0000</pubDate>
		<guid isPermaLink="false">http://atomized.org/?p=370#comment-131943</guid>
		<description>[...] Eure also has a post on working with multiple databases here. It uses a new buffer for each database which is probably preferable to killing the [...]</description>
		<content:encoded><![CDATA[<p>[...] Eure also has a post on working with multiple databases here. It uses a new buffer for each database which is probably preferable to killing the [...]</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Ian</title>
		<link>http://atomized.org/2008/10/enhancing-emacs%e2%80%99-sql-mode/comment-page-1/#comment-103259</link>
		<dc:creator>Ian</dc:creator>
		<pubDate>Sun, 19 Oct 2008 21:04:27 +0000</pubDate>
		<guid isPermaLink="false">http://atomized.org/?p=370#comment-103259</guid>
		<description>Aha. I like the idea, though I prefer to use the buffer name rather than the header. Aquamacs’ tabbar-mode takes the header over, so if you set anything there, the tabs break.

I’m definitely appropriating the concept, though.</description>
		<content:encoded><![CDATA[<p>Aha. I like the idea, though I prefer to use the buffer name rather than the header. Aquamacs’ tabbar-mode takes the header over, so if you set anything there, the tabs break.</p>
<p>I’m definitely appropriating the concept, though.</p>
]]></content:encoded>
	</item>
	<item>
		<title>By: Eric Hanchrow</title>
		<link>http://atomized.org/2008/10/enhancing-emacs%e2%80%99-sql-mode/comment-page-1/#comment-103254</link>
		<dc:creator>Eric Hanchrow</dc:creator>
		<pubDate>Sun, 19 Oct 2008 20:52:18 +0000</pubDate>
		<guid isPermaLink="false">http://atomized.org/?p=370#comment-103254</guid>
		<description>I find this handy -- it puts the SQL server&#039;s name, and the database name, in the header line:

(defun sql-update-header-line ()
  (setq header-line-format
        &#039;(:propertize
          (&quot;&quot; sql-server &quot;:&quot; sql-database)
          face highlight)))

(defun sql-update-db-from-input (input)
  (when (string-match (rx bos &quot;use&quot; 
                          (one-or-more blank) 
                          (group (one-or-more graphic))
                          (zero-or-more blank)
                          &quot;;&quot;)
                      input)
    (setq sql-database (match-string 1 input) )
    (sql-update-header-line)))
   
(add-hook &#039;sql-interactive-mode-hook
          (lambda ()
            ;; so I don&#039;t forget what db I&#039;m connected to!
            (set (make-local-variable &#039;comint-input-filter-functions) 
                 (list &#039;sql-update-db-from-input))
            (sql-update-header-line)))</description>
		<content:encoded><![CDATA[<p>I find this handy &#8212; it puts the SQL server&#8217;s name, and the database name, in the header line:</p>
<p>(defun sql-update-header-line ()<br />
  (setq header-line-format<br />
        &#8216;(:propertize<br />
          (&#8220;&#8221; sql-server &#8220;:&#8221; sql-database)<br />
          face highlight)))</p>
<p>(defun sql-update-db-from-input (input)<br />
  (when (string-match (rx bos &#8220;use&#8221;<br />
                          (one-or-more blank)<br />
                          (group (one-or-more graphic))<br />
                          (zero-or-more blank)<br />
                          &#8220;;&#8221;)<br />
                      input)<br />
    (setq sql-database (match-string 1 input) )<br />
    (sql-update-header-line)))</p>
<p>(add-hook &#8217;sql-interactive-mode-hook<br />
          (lambda ()<br />
            ;; so I don&#8217;t forget what db I&#8217;m connected to!<br />
            (set (make-local-variable &#8216;comint-input-filter-functions)<br />
                 (list &#8217;sql-update-db-from-input))<br />
            (sql-update-header-line)))</p>
]]></content:encoded>
	</item>
</channel>
</rss>
