[Assorted-commits] SF.net SVN: assorted:[1584] configs/trunk/src/emacs

SourceForge Headquarters 225 Broadway Suite 1600 San Diego, CA 92101 +1 (858) 422-6466

Revision: 1584
          http://assorted.svn.sourceforge.net/assorted/?rev=1584&view=rev
Author:   yangzhang
Date:     2010-03-20 15:48:07 +0000 (Sat, 20 Mar 2010)

Log Message:
-----------
added sml modeline

Modified Paths:
--------------
    configs/trunk/src/emacs/yang.el

Added Paths:
-----------
    configs/trunk/src/emacs/sml-modeline.el

Added: configs/trunk/src/emacs/sml-modeline.el
===================================================================

--- configs/trunk/src/emacs/sml-modeline.el	                        (rev 0)
+++ configs/trunk/src/emacs/sml-modeline.el	2010-03-20 15:48:07 UTC (rev 1584)
@@ -0,0 +1,1234 @@
+<?xml version="1.0"?>
+<html xmlns="http://www.w3.org/1999/xhtml">
+<head>
+<meta content="text/html; charset=utf-8" http-equiv="Content-Type" />
+<meta content="Loggerhead/1.17 Python/2.5.2 Bazaar/2.1.0 Paste/1.7.2 PasteDeploy/1.3.3 SimpleTAL/4.1 Pygments/0.9 simplejson/2.0.9" name="generator" />
+<title>~nxhtml/nxhtml/main : contents of util/sml-modeline.el at revision 599</title>
+<link href="/static/css/global.css" rel="stylesheet" />
+
+<script type="text/javascript">
+var global_path = 'http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/';
+var collapsed_icon_path = '/static/images/treeCollapsed.png';
+var expanded_icon_path = '/static/images/treeExpanded.png';
+</script>
+<script src="/static/javascript/yui/build/yui/yui-min.js" type="text/javascript"></script>
+<script src="/static/javascript/yui/build/oop/oop-min.js" type="text/javascript"></script>
+<script src="/static/javascript/yui/build/event/event-min.js" type="text/javascript"></script>
+<script src="/static/javascript/yui/build/attribute/attribute-min.js" type="text/javascript"></script>
+<script src="/static/javascript/yui/build/base/base-min.js" type="text/javascript"></script>
+<script src="/static/javascript/yui/build/dom/dom-min.js" type="text/javascript"></script>
+<script src="/static/javascript/yui/build/node/node-min.js" type="text/javascript"></script>
+<script src="/static/javascript/yui/build/anim/anim-min.js" type="text/javascript"></script>
+<script src="/static/javascript/yui/build/io/io-base-min.js" type="text/javascript"></script>
+<script src="/static/javascript/custom.js" type="text/javascript"></script>
+
+<link href="/static/css/annotate.css" media="all" type="text/css" rel="stylesheet" />
+<link href="/static/css/highlight.css" media="all" type="text/css" rel="stylesheet" />
+
+</head>
+<body>
+
+
+<ul id="menuTabs">
+
+
+<li><a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/changes" title="Changes">Changes</a></li>
+<li><a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/files" title="Files" id="on">Files</a></li>
+<li><a href="https://help.launchpad.net/Loggerhead" title="Help">Help</a></li>
+
+</ul>
+
+<div id="loggerheadCont">
+<div id="search_terms"></div>
+<h1>
+
+<a href="https://code.launchpad.net/~nxhtml/nxhtml/main">~nxhtml/nxhtml/main</a>
+
+
+<span>: <span class="breadcrumb">
+/<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/files/599?file_id=util-20080724174035-zgon4j679232cch3-9">util</a>/sml-modeline.el
+</span> (revision 599)</span>
+</h1>
+<div>
+
+<ul id="submenuTabs">
+<li id="first">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/files/599">browse files</a>
+</li>
+<li>
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/599">view revision</a>
+</li>
+<li>
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/changes?filter_file_id=smlmodeline.el-20100318165023-n7kkswg6dlq8l6b3-1">view changes to this file</a>
+</li>
+<li id="last">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/download/head%3A/smlmodeline.el-20100318165023-n7kkswg6dlq8l6b3-1/sml-modeline.el">download file</a>
+</li>
+</ul>
+<div class="annotate">
+<table id="logentries">
+<tr class="logheader">
+<td class="annoLineTit">Line</td>
+<td class="annoRevTit">Revision</td>
+<td class="annoContTit">Contents</td>
+</tr>
+<tr class="blueRow1">
+<td class="annoLine"><a id="L1" href="#L1">1</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;; sml-modeline.el --- Show position in a scrollbar like way in mode-line</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L2" href="#L2">2</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L3" href="#L3">3</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Author: Lennart Borgman (lennart O borgman A gmail O com)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L4" href="#L4">4</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Created: 2010-03-16 Tue</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L5" href="#L5">5</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/590.1.1" title="590.1.1 by Lennart Borgman, on 18 Mar 2010 16:56 (2010-03-18 16:56:27)">590.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Version: 0.5</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L6" href="#L6">6</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Last-Updated: 2010-03-18 Thu</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L7" href="#L7">7</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/590.1.1" title="590.1.1 by Lennart Borgman, on 18 Mar 2010 16:56 (2010-03-18 16:56:27)">590.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; URL: http://bazaar.launchpad.net/~nxhtml/nxhtml/main/annotate/head%3A/util/sml-modeline.el</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L8" href="#L8">8</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Keywords:</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L9" href="#L9">9</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Compatibility:</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L10" href="#L10">10</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L11" href="#L11">11</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Features that might be required by this library:</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L12" href="#L12">12</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L13" href="#L13">13</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/591.1.1" title="591.1.1 by Lennart Borgman, on 18 Mar 2010 19:52 (2010-03-18 19:52:41)">591.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;   None</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L14" href="#L14">14</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L15" href="#L15">15</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L16" href="#L16">16</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L17" href="#L17">17</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;; Commentary:</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L18" href="#L18">18</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L19" href="#L19">19</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Show scrollbar like position indicator in mode line.</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L20" href="#L20">20</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/593.1.1" title="593.1.1 by Lennart Borgman, on 18 Mar 2010 22:21 (2010-03-18 22:21:37)">593.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; See the global minor mode `sml-modeline-mode&#39; for more information.</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L21" href="#L21">21</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L22" href="#L22">22</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Idea and part of this code is adapted from David Engster&#39;s and Drew</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L23" href="#L23">23</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Adam&#39;s code in these mail messages:</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L24" href="#L24">24</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L25" href="#L25">25</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;   http://lists.gnu.org/archive/html/emacs-devel/2010-03/msg00523.html</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L26" href="#L26">26</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;   http://permalink.gmane.org/gmane.emacs.devel/122038</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L27" href="#L27">27</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L28" href="#L28">28</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L29" href="#L29">29</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L30" href="#L30">30</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;; Change log:</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L31" href="#L31">31</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L32" href="#L32">32</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L33" href="#L33">33</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L34" href="#L34">34</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L35" href="#L35">35</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; This program is free software; you can redistribute it and/or</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L36" href="#L36">36</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; modify it under the terms of the GNU General Public License as</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L37" href="#L37">37</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; published by the Free Software Foundation; either version 3, or</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L38" href="#L38">38</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; (at your option) any later version.</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L39" href="#L39">39</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L40" href="#L40">40</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; This program is distributed in the hope that it will be useful,</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L41" href="#L41">41</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; but WITHOUT ANY WARRANTY; without even the implied warranty of</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L42" href="#L42">42</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L43" href="#L43">43</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; General Public License for more details.</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L44" href="#L44">44</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L45" href="#L45">45</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; You should have received a copy of the GNU General Public License</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L46" href="#L46">46</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; along with this program; see the file COPYING.  If not, write to</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L47" href="#L47">47</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L48" href="#L48">48</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; Floor, Boston, MA 02110-1301, USA.</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L49" href="#L49">49</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L50" href="#L50">50</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L51" href="#L51">51</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L52" href="#L52">52</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;; Code:</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L53" href="#L53">53</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L54" href="#L54">54</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;;###autoload</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L55" href="#L55">55</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-p">(</span><span class="pyg-nv">defgroup</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline</span><span class="pyg-"> </span><span class="pyg-no">nil</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L56" href="#L56">56</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/593.1.1" title="593.1.1 by Lennart Borgman, on 18 Mar 2010 22:21 (2010-03-18 22:21:37)">593.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-s">&quot;Customization group for `sml-modeline-mode&#39;.&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L57" href="#L57">57</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:group</span><span class="pyg-"> </span><span class="pyg-ss">&#39;frames</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L58" href="#L58">58</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L59" href="#L59">59</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-p">(</span><span class="pyg-nb">defun</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-refresh</span><span class="pyg-"> </span><span class="pyg-p">()</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L60" href="#L60">60</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-s">&quot;Refresh after option changes if loaded.&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L61" href="#L61">61</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-p">(</span><span class="pyg-nb">when</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">featurep</span><span class="pyg-"> </span><span class="pyg-ss">&#39;sml-modeline</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L62" href="#L62">62</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">    </span><span class="pyg-p">(</span><span class="pyg-nb">when</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">and</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">boundp</span><span class="pyg-"> </span><span class="pyg-ss">&#39;sml-modeline-mode</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L63" href="#L63">63</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">               </span><span class="pyg-nv">sml-modeline-mode</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L64" href="#L64">64</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">      </span><span class="pyg-p">(</span><span class="pyg-nv">sml-modeline-mode</span><span class="pyg-"> </span><span class="pyg-mi">-1</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L65" href="#L65">65</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">      </span><span class="pyg-p">(</span><span class="pyg-nv">sml-modeline-mode</span><span class="pyg-"> </span><span class="pyg-mi">1</span><span class="pyg-p">))))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L66" href="#L66">66</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L67" href="#L67">67</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-p">(</span><span class="pyg-nv">defcustom</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-len</span><span class="pyg-"> </span><span class="pyg-mi">12</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L68" href="#L68">68</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-s">&quot;Mode line indicator total length.&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L69" href="#L69">69</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:type</span><span class="pyg-"> </span><span class="pyg-ss">&#39;integer</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L70" href="#L70">70</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:set</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-k">lambda</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">sym</span><span class="pyg-"> </span><span class="pyg-nv">val</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L71" href="#L71">71</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-nv">set-default</span><span class="pyg-"> </span><span class="pyg-nv">sym</span><span class="pyg-"> </span><span class="pyg-nv">val</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L72" href="#L72">72</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-nv">sml-modeline-refresh</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L73" href="#L73">73</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:group</span><span class="pyg-"> </span><span class="pyg-ss">&#39;sml-modeline</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L74" href="#L74">74</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L75" href="#L75">75</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-p">(</span><span class="pyg-nv">defcustom</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-borders</span><span class="pyg-"> </span><span class="pyg-no">nil</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L76" href="#L76">76</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-s">&quot;Indicator borders.</span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L77" href="#L77">77</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-s">This is a pair of indicators, like [] or nil.&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L78" href="#L78">78</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:type</span><span class="pyg-"> </span><span class="pyg-o">&#39;</span><span class="pyg-p">(</span><span class="pyg-nv">choice</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">const</span><span class="pyg-"> </span><span class="pyg-ss">:tag</span><span class="pyg-"> </span><span class="pyg-s">&quot;None&quot;</span><span class="pyg-"> </span><span class="pyg-no">nil</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L79" href="#L79">79</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                 </span><span class="pyg-p">(</span><span class="pyg-nb">cons</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">string</span><span class="pyg-"> </span><span class="pyg-ss">:tag</span><span class="pyg-"> </span><span class="pyg-s">&quot;Left border&quot;</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L80" href="#L80">80</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                       </span><span class="pyg-p">(</span><span class="pyg-nb">string</span><span class="pyg-"> </span><span class="pyg-ss">:tag</span><span class="pyg-"> </span><span class="pyg-s">&quot;Right border&quot;</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L81" href="#L81">81</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:set</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-k">lambda</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">sym</span><span class="pyg-"> </span><span class="pyg-nv">val</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L82" href="#L82">82</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-nv">set-default</span><span class="pyg-"> </span><span class="pyg-nv">sym</span><span class="pyg-"> </span><span class="pyg-nv">val</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L83" href="#L83">83</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-nv">sml-modeline-refresh</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L84" href="#L84">84</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:group</span><span class="pyg-"> </span><span class="pyg-ss">&#39;sml-modeline</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L85" href="#L85">85</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L86" href="#L86">86</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-p">(</span><span class="pyg-nv">defcustom</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-numbers</span><span class="pyg-"> </span><span class="pyg-ss">&#39;percentage</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L87" href="#L87">87</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-s">&quot;Position number style.</span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L88" href="#L88">88</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-s">This can be &#39;percentage or &#39;line-number.&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L89" href="#L89">89</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:type</span><span class="pyg-"> </span><span class="pyg-o">&#39;</span><span class="pyg-p">(</span><span class="pyg-nv">choice</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">const</span><span class="pyg-"> </span><span class="pyg-ss">:tag</span><span class="pyg-"> </span><span class="pyg-s">&quot;Line numbers&quot;</span><span class="pyg-"> </span><span class="pyg-nv">line-numbers</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L90" href="#L90">90</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                 </span><span class="pyg-p">(</span><span class="pyg-nv">const</span><span class="pyg-"> </span><span class="pyg-ss">:tag</span><span class="pyg-"> </span><span class="pyg-s">&quot;Percentage&quot;</span><span class="pyg-"> </span><span class="pyg-nv">percentage</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L91" href="#L91">91</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:set</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-k">lambda</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">sym</span><span class="pyg-"> </span><span class="pyg-nv">val</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L92" href="#L92">92</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-nv">set-default</span><span class="pyg-"> </span><span class="pyg-nv">sym</span><span class="pyg-"> </span><span class="pyg-nv">val</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L93" href="#L93">93</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-nv">sml-modeline-refresh</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L94" href="#L94">94</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:group</span><span class="pyg-"> </span><span class="pyg-ss">&#39;sml-modeline</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L95" href="#L95">95</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L96" href="#L96">96</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-p">(</span><span class="pyg-nv">defface</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-end-face</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L97" href="#L97">97</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-o">&#39;</span><span class="pyg-p">((</span><span class="pyg-no">t</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-ss">:inherit</span><span class="pyg-"> </span><span class="pyg-nv">match</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L98" href="#L98">98</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-s">&quot;Face for invisible buffer parts.&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L99" href="#L99">99</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:group</span><span class="pyg-"> </span><span class="pyg-ss">&#39;sml-modeline</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L100" href="#L100">100</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; &#39;face `(:background ,(face-foreground &#39;mode-line-inactive)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L101" href="#L101">101</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;         :foreground ,(face-background &#39;mode-line))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L102" href="#L102">102</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L103" href="#L103">103</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-p">(</span><span class="pyg-nv">defface</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-vis-face</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L104" href="#L104">104</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-o">&#39;</span><span class="pyg-p">((</span><span class="pyg-no">t</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-ss">:inherit</span><span class="pyg-"> </span><span class="pyg-nv">region</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L105" href="#L105">105</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-s">&quot;Face for invisible buffer parts.&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L106" href="#L106">106</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">  </span><span class="pyg-ss">:group</span><span class="pyg-"> </span><span class="pyg-ss">&#39;sml-modeline</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L107" href="#L107">107</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;; &#39;face `(:background ,(face-foreground &#39;mode-line)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L108" href="#L108">108</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;         :foreground ,(face-background &#39;mode-line))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L109" href="#L109">109</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L110" href="#L110">110</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-c1">;;(sml-modeline-create)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L111" href="#L111">111</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-p">(</span><span class="pyg-nb">defun</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-create</span><span class="pyg-"> </span><span class="pyg-p">()</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L112" href="#L112">112</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-k">let*</span><span class="pyg-"> </span><span class="pyg-p">((</span><span class="pyg-nv">wstart</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">window-start</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L113" href="#L113">113</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-p">(</span><span class="pyg-nv">wend</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">window-end</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L114" href="#L114">114</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-nv">number-max</span><span class="pyg-"> </span><span class="pyg-nv">number-beg</span><span class="pyg-"> </span><span class="pyg-nv">number-end</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L115" href="#L115">115</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-p">(</span><span class="pyg-nv">sml-begin</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">or</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">car</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-borders</span><span class="pyg-p">)</span><span class="pyg-"> </span><span class="pyg-s">&quot;&quot;</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L116" href="#L116">116</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-p">(</span><span class="pyg-nv">sml-end</span><span class="pyg-">   </span><span class="pyg-p">(</span><span class="pyg-nb">or</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">cdr</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-borders</span><span class="pyg-p">)</span><span class="pyg-"> </span><span class="pyg-s">&quot;&quot;</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L117" href="#L117">117</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-p">(</span><span class="pyg-nv">inner-len</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">-</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-len</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">length</span><span class="pyg-"> </span><span class="pyg-nv">sml-begin</span><span class="pyg-p">)</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">length</span><span class="pyg-"> </span><span class="pyg-nv">sml-end</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L118" href="#L118">118</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-nv">bpad-len</span><span class="pyg-"> </span><span class="pyg-nv">epad-len</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L119" href="#L119">119</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-nv">pos-%</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L120" href="#L120">120</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-nv">start</span><span class="pyg-"> </span><span class="pyg-nv">end</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L121" href="#L121">121</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">        </span><span class="pyg-nb">string</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L122" href="#L122">122</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">   </span><span class="pyg-p">(</span><span class="pyg-k">if</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">not</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">or</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">&lt;</span><span class="pyg-"> </span><span class="pyg-nv">wend</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">save-restriction</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">widen</span><span class="pyg-p">)</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">point-max</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L123" href="#L123">123</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                </span><span class="pyg-p">(</span><span class="pyg-nb">&gt;</span><span class="pyg-"> </span><span class="pyg-nv">wstart</span><span class="pyg-"> </span><span class="pyg-mi">1</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow1">
+<td class="annoLine"><a id="L124" href="#L124">124</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/589.1.1" title="589.1.1 by Lennart Borgman, on 18 Mar 2010 16:50 (2010-03-18 16:50:52)">589.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-s">&quot;&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L125" href="#L125">125</a></td>
+<td class="annoRev">
+<a href="http://bazaar.launchpad.net/%7Enxhtml/nxhtml/main/revision/594.1.1" title="594.1.1 by Lennart Borgman, on 19 Mar 2010 00:04 (2010-03-19 00:04:56)">594.1.1</a>
+</td>
+<td class="annoCont"><pre><span class="pyg-">     </span><span class="pyg-p">(</span><span class="pyg-nb">cond</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L126" href="#L126">126</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">      </span><span class="pyg-p">((</span><span class="pyg-nb">eq</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-numbers</span><span class="pyg-"> </span><span class="pyg-ss">&#39;percentage</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L127" href="#L127">127</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">number-max</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">save-restriction</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">widen</span><span class="pyg-p">)</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">point-max</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L128" href="#L128">128</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">number-beg</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">/</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">float</span><span class="pyg-"> </span><span class="pyg-nv">wstart</span><span class="pyg-p">)</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">float</span><span class="pyg-"> </span><span class="pyg-nv">number-max</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L129" href="#L129">129</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">number-end</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">/</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">float</span><span class="pyg-"> </span><span class="pyg-nv">wend</span><span class="pyg-p">)</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">float</span><span class="pyg-"> </span><span class="pyg-nv">number-max</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L130" href="#L130">130</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">start</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">floor</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">*</span><span class="pyg-"> </span><span class="pyg-nv">number-beg</span><span class="pyg-"> </span><span class="pyg-nv">inner-len</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L131" href="#L131">131</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">end</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">floor</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">*</span><span class="pyg-"> </span><span class="pyg-nv">number-end</span><span class="pyg-"> </span><span class="pyg-nv">inner-len</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L132" href="#L132">132</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nb">string</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L133" href="#L133">133</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">             </span><span class="pyg-p">(</span><span class="pyg-nv">concat</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">format</span><span class="pyg-"> </span><span class="pyg-s">&quot;%02d&quot;</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">round</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">*</span><span class="pyg-"> </span><span class="pyg-nv">number-beg</span><span class="pyg-"> </span><span class="pyg-mi">100</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L134" href="#L134">134</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                     </span><span class="pyg-s">&quot;-&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L135" href="#L135">135</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                     </span><span class="pyg-p">(</span><span class="pyg-nb">format</span><span class="pyg-"> </span><span class="pyg-s">&quot;%02d&quot;</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">round</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">*</span><span class="pyg-"> </span><span class="pyg-nv">number-end</span><span class="pyg-"> </span><span class="pyg-mi">100</span><span class="pyg-p">)))</span><span class="pyg-"> </span><span class="pyg-s">&quot;%%&quot;</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L136" href="#L136">136</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">      </span><span class="pyg-p">((</span><span class="pyg-nb">eq</span><span class="pyg-"> </span><span class="pyg-nv">sml-modeline-numbers</span><span class="pyg-"> </span><span class="pyg-ss">&#39;line-numbers</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L137" href="#L137">137</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-nv">save-restriction</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L138" href="#L138">138</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-nv">widen</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L139" href="#L139">139</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">number-max</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">line-number-at-pos</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">point-max</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L140" href="#L140">140</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">number-beg</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">line-number-at-pos</span><span class="pyg-"> </span><span class="pyg-nv">wstart</span><span class="pyg-p">))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L141" href="#L141">141</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">         </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">number-end</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nv">line-number-at-pos</span><span class="pyg-"> </span><span class="pyg-nv">wend</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L142" href="#L142">142</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">start</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">floor</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">*</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">/</span><span class="pyg-"> </span><span class="pyg-nv">number-beg</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">float</span><span class="pyg-"> </span><span class="pyg-nv">number-max</span><span class="pyg-p">))</span><span class="pyg-"> </span><span class="pyg-nv">inner-len</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L143" href="#L143">143</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nv">end</span><span class="pyg-">   </span><span class="pyg-p">(</span><span class="pyg-nb">floor</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">*</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">/</span><span class="pyg-"> </span><span class="pyg-nv">number-end</span><span class="pyg-"> </span><span class="pyg-p">(</span><span class="pyg-nb">float</span><span class="pyg-"> </span><span class="pyg-nv">number-max</span><span class="pyg-p">))</span><span class="pyg-"> </span><span class="pyg-nv">inner-len</span><span class="pyg-p">)))</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L144" href="#L144">144</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">       </span><span class="pyg-p">(</span><span class="pyg-k">setq</span><span class="pyg-"> </span><span class="pyg-nb">string</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L145" href="#L145">145</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">             </span><span class="pyg-p">(</span><span class="pyg-nv">concat</span><span class="pyg-"> </span><span class="pyg-s">&quot;L&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L146" href="#L146">146</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                     </span><span class="pyg-p">(</span><span class="pyg-nb">format</span><span class="pyg-"> </span><span class="pyg-s">&quot;%02d&quot;</span><span class="pyg-"> </span><span class="pyg-nv">number-beg</span><span class="pyg-p">)</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L147" href="#L147">147</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                     </span><span class="pyg-s">&quot;-&quot;</span><span class="pyg-"></span></pre></td>
+</tr><tr class="blueRow0">
+<td class="annoLine"><a id="L148" href="#L148">148</a></td>
+<td class="annoRev">
+
+</td>
+<td class="annoCont"><pre><span class="pyg-">                     </span><span class="pyg-p">(</span><span class="pyg-nb">format</span><span class=...
 
[truncated message content]