Skip to content

Commit

Permalink
nothing
Browse files Browse the repository at this point in the history
  • Loading branch information
graehl committed May 3, 2012
1 parent fd0ff23 commit 0f9370e
Show file tree
Hide file tree
Showing 8 changed files with 28 additions and 10 deletions.
8 changes: 3 additions & 5 deletions buffer-init.el
Expand Up @@ -32,13 +32,11 @@ file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)"))
functions from which to deduce C++ namespace names."
':type 'alist )

(defun my-filter-path-elts
(if (equal (car pe) "x")
(my-filter-path-elts (cdr pe))
(if (or (equal (car pe) "r") (equal (car pe) "racerx"))
(defun my-filter-path-elts (pe)
(if (or (equal (car pe) "x") (equal (car pe) "r") (equal (car pe) "racerx"))
(my-filter-path-elts (cons "LW" (my-filter-path-elts (cdr pe))))
(if (equal (car pe) "LWUtil")
nil
pe))))
pe)))

(provide 'buffer-init)
7 changes: 5 additions & 2 deletions defuns/c-defuns.el
Expand Up @@ -177,20 +177,23 @@ is not supplied, the boost copyright is used by default"
path-elts)
(insert nsfini)

(setq final (point))
(newline)

(setq final (point))
(newline)
(bufend)
;; make sure the next stuff goes on its own line
(if (not (equal (current-column) 0))
(newline))

(newline)
;; closing namespace stuff
(mapc (lambda (n) (insert "}")) path-elts)
(when nil
(reduce (lambda (prefix n)
(insert prefix n) "::")
path-elts
:initial-value " // namespace ")
)
(insert nsfini)
(insert nsfini)
(insert "#endif // " guard)
Expand Down
1 change: 1 addition & 0 deletions key-bindings.el
Expand Up @@ -294,3 +294,4 @@
(global-set-key (kbd "C-M-g") 'keyboard-quit)
(require 'minibuffer-defuns)
(global-set-key (kbd "C-g") 'keyboard-really-quit)
(global-set-key (kbd "M-g") '(lambda () (interactive) (exchange-point-and-mark 1)))
1 change: 1 addition & 0 deletions local.el
Expand Up @@ -5,3 +5,4 @@
(when (string= system-name "LATTE")
(setq inferior-octave-program "C:\\octave\\Octave3.6.1_gcc4.6.2\\bin\\octave.exe")
)
(setq transient-mark-mode t)
2 changes: 1 addition & 1 deletion setup-gud-mode.el
Expand Up @@ -20,7 +20,7 @@
(local-set-key [f2] 'gud-cont)
(local-set-key [f12] 'gud-step)
(local-set-key [f10] 'gud-next)
(local-set-key [(shift f11)] 'gud-finish)
(local-set-key [f11] 'gud-finish)
(local-set-key [(control f10)] 'my-gud-run-to-cursor)
(local-set-key [f9] 'gud-break)
(local-set-key [(shift f9)] 'gud-remove))
Expand Down
8 changes: 8 additions & 0 deletions setup-isearch.el
@@ -1,6 +1,14 @@
(require 'isearch+)
(setq isearchp-set-region-flag nil) ; i like t, but need it to restore state after i move or it's unusable
(require 'misc-cmds)
(defun isearchp-set-region ()
"Set region around search target, if `isearchp-set-region-flag'.
Used only for Transient Mark mode."
(when (and isearchp-set-region-flag transient-mark-mode)
(push-mark isearch-other-end t 'activate)))

(add-hook 'isearch-mode-end-hook 'isearchp-set-region)

(provide 'setup-isearch)


Expand Down
4 changes: 2 additions & 2 deletions snippets/c++-mode/namespace-hg.yasnippet
Expand Up @@ -2,6 +2,6 @@
# name: namespace hypergraph
# key: nh
# --
namespace LW { namespace Hypergraph {
namespace LW { namespace xmt { namespace Hypergraph {
$0
}}//ns
}}}
7 changes: 7 additions & 0 deletions snippets/c++-mode/namespace-xmt.yasnippet
@@ -0,0 +1,7 @@
# -*- mode: snippet -*-
# name: namespace hypergraph
# key: nx
# --
namespace LW { namespace xmt {
$0
}}

0 comments on commit 0f9370e

Please sign in to comment.