《亮剑》的真正結局

在班車上看完了《亮剑》的小说，悲惨的结局让我都落下泪来（真的）。好久之前在书店无意中发现《亮剑》电视剧比小说少了后面好大一截，一直说要看看，却拖到了现在。

想发篇博文讲一下《亮剑》的真 正结局，却被JavaEye博客系统认为包含敏感词拒绝了，还威胁说要记录我的IP。我 艹，还是回blogger写吧（去年因为blogger再次封闭，自己又较长时间没太大想写的欲望，于是博客就停了。因为javaeye网站上班时可以上，年初开始在那上面贴了点几分简单的备忘性质的博文，但似乎从没认真作为俺的“归属”对待过——不过那上面的闲聊倒用得挺多。）

再看一下中断之前的最后一篇文章，居然是《我的团长我的团》，也是一部被电视剧上阉割的小说，再联系如今网络被GFW步步紧逼的现状，唉！


－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
50年代未期，有反苏言论的丁伟军长被迫害致死。

66年，时任总参正军级的赵刚因拒绝与罗瑞卿划清界线，因不堪迫害，与冯楠双双自杀，死前将四个子女送到厦门李云龙处。

68年，造反派搞武斗，越搞越大，后来为了搞榴弹炮而冲击军队驻地，时任福建军分区的李云龙军长在厦门因下命令对冲击军队的造反派开枪，造成几十人死伤，全国轰动，被关押前，时任东北军区的孔捷军长派人将李云龙的六个小孩（四个是赵刚的）接到东北，不久李云龙开枪自杀，二天后，也被隔离审查的田雨用刀片割腕自杀，伤口向孩子嘴那么大....

当时国军金门岛楚云飞中将也以贝多芬的第二乐章表示哀悼。　

79年李云龙将军恢复名誉。

91年一位少将和五位大校齐聚厦门，哭倒在他们的父母旧屋之中.....

据说电视剧已拍到这些人的结局，但审查未通过，就播到授衔就止了。

emacs: window下使用sdcv

1.先编译sdcv
由于sdcv需要glib2和其它一些UNIX下常用函数，在mingw下编译比较麻烦，就在Cygwin下编译了。

需要注意的是Cygwin下编译时，需要将src/Makefile.in中
    sdcv_LDADD = @SDCV_LIBS@ @LIBINTL@ @LIBREADLINE@ lib/libstardict.a
改为
    sdcv_LDADD = lib/libstardict.a @SDCV_LIBS@ @LIBINTL@ @LIBREADLINE@
即将静态库放到前面，否则链接时会报告一大堆函数找不到，这是移植程序到Cygwin常碰到的一个问题（另一个问题是Windows下动态库不能引用任何编译时找不到的函数/变量，而Linux下可以支持运行期解析，即可以直接在插件中使用主程序的函数/变量或者早先加载的其它动态库里的函数/变量）

2.开始试的是emacswiki.org上的 sdcv.el, 但它死活不能正常工作， *FIXME*原因似乎是: 它有指定词典的功能，但这个词典名通过命令行传递时，会出现编码不被sdcv.exe识别的问题(不是这个原因?)
 
  <2010-05-05 >: 调试了一下，发现是sdcv-search-detail函数的问题，导致了两次调用shell（第二次还传了个奇怪的参数进去)注释掉361行即可。但没看懂代码的意图，还不明白具体错在什么地方。

3.然后找到了 http://code.google.com/p/sdcv-mode 上的sdcv-mode.el，这个库比较简单，安装上之后直接load-library 'sdcv-mode, 然后就可以调sdcv-search命令了
   
  注: Cygwin会检测cygwin1.dll重复的问题，如果将X:/cygwin/bin加入PATH后就可能会因这个问题而拒绝工作。这种情况下改用一个sdcv.bat来包装一下sdcv.exe，就没有这个现象了

imenu parser for emacs delphi-mode

improve the one found on  http://www.emacswiki.org/emacs/DelphiMode

1. support 'record', 'class' and 'interface' as level 1 menu
2. methods show as submenu of class
3. correctly jump to the impl. part (ignore interface part)

FIXME: currently not work if no 'interface/implementation'

keyword: emacs, delphi, freepascal, imenu, ecb

Emacs的Tab键与缩进

** EMACS缺省的模式

*** 在缺省的键绑定下，TAB键是这样工作的

(见indent.el中indent-for-tab-command函数)

if 选择的是块
   then 对块进行语法缩进
else
 if (eq tab-always-indent t)
    then (按下TAB键时始终对当前行按语法缩进，不管是在行开始的空白处还是
         后面的位置，缩进量与tab-width参数无关，只与当前语法风格有关系,具体
         缩进由indent-line-function完成，各个模块可重新定义这个函数)
 else
    if 如果光标在
        1）行首空白区(即在indentation区内)，则取消所有缩进
        2) 行首第一个非空白字符上， 则按第一次则语法缩进，第二次则插入
           tab字符或者空格(插入TAB还是空格则依赖于indent-tabs-mode设置)
        3) 不在行首,插入tab字符或者空格

*** tab-width / default-tab-width
    只影响真正tab字符的显示宽度，不影响按TAB键的缩进量(但会反过来
    将缩进量换算为tab字符个数+空格个数，这与其它编辑器相反，它们是每次添加
    tab字符或者相应的空格数)

*** M-i & tab-stop-list
    M-i在功能上跟平日里在其它编辑器里面的TAB键倒有点相近（如果所选的不是一
    块的话），它会将后面的字符向后移动，移到tab-stop-list里面所指向的下一个
    stop点，具体是填充tab字符还是空格以及多少个，也是由indent-tabs-mode和
    tab-width确定。(这个tab-stop-list对于编程人员，似乎没有什么用处)。

 

** 我期望的工作方式

*** 不插入tab字符，因为TAB是邪恶的(setq indent-tabs-mode nil)，实在需要TAB键则用C-q TAB
*** 每次缩进4个空格(setq default-tab-width 4)
*** 缩进完全自行控制，不用syntax indentation来自动 （按语法格式化完全可以使用C-_）
*** 按TAB键时
    如果选择多行，则缩进(行首插入多个空格)
    如果未选择多行，当前光标在行首（不管是indentation区还是第一个字符上)，则缩进
        光标不在行首，插入多个空格[1]
*** 按Shift-TAB键时
    如果选择多行，则反缩进(行首删除多个空格)
    如果未选择多行，光标在行首，反缩进
        光标不在行首，发向移动光标或者什么也不做

 

** 解决方案

从最后两条来看，原来的indent-for-tab-command不能满足需求，需要将TAB键绑定到别的函数才行。在网上搜了半天，找到这篇文章提供的方法正是我所要的：
emacs, indent/unindent region as a block using the tab key
http://ignaciopp.wordpress.com/2009/06/17/emacs-indentunindent-region-as-a-block-using-tab-key/


[1] 如果要将代码补齐考虑进来，则:
        如果光标在一个单词的末尾，则TAB键需要激活补全函数
        如果单词后有一个空格，再按TAB键则添加空格

上面链接中的实现也考虑了，如果要对接其它的代码补齐，只需要将(hippie-expand nil)换成其它的即可，比如auto-complete的ac-start