将同一行上的嵌套命名空间缩进一级

Question

在 emacs 21 中：

namespace Abc { namespace Def { 
    class X;
    namespace Ghi {
        class Y;
    }
} }

但现在在 emacs 22.2.1 中：

namespace Abc { namespace Def {
        class X;
        namespace Ghi {
            class Y;
        }
    } }

如何恢复旧的行为？请注意，我不需要固定的缩进列，我希望它缩进一个级别，无论该行包含多少个“命名空间{”。

Answer 1

事实上，我自己在一个清晰的思考中找到了答案：

(defun followed-by (cases)
  (cond ((null cases) nil)
        ((assq (car cases) 
               (cdr (memq c-syntactic-element c-syntactic-context))) t)
        (t (followed-by (cdr cases)))))


(c-add-style  "foo"      
              `( ...
        (c-offsets-alist
         ( ... )
         (innamespace
          . (lambda (x) 
          (if (followed-by 
               '(innamespace namespace-close)) 0 '+))))))

“……”当然象征着其他个性化。