3,899
edits
Changes
Jump to navigation
Jump to search
m
(define-key (current-local-map) "\C-cnF" 'context-FLOW-insert-cells)
(goto-char beg) (while (search-forward-regexp "{\\([0-9]+\\),\\([0-9]+\\)}" end t) (replace-match (concat "{" (number-to-string (+ (string-to-number (match-string 1)) x)) "," (number-to-string (+ (string-to-number (match-string 2)) y)) "}") nil nil))))
drop navbox
== Help with delimters delimiters and math mode ==
These customizations are mostly for faster insertion of special characters (and math mode).
(add-hook 'ConTeXt-mode-hook
'(lambda ()
(local-set-key "\C-cnr" 'context-insert-nattab-row)
(local-set-key "\C-cnc" 'context-insert-nattab-column)
</pre>
== Working Help with FLOW charts (from m-chart.tex) ==
<pre>
;; Johan Sandblom. No copyright.(defun context-FLOW-shift-cells (x y &optional beg end)
"Shifts FLOW cells in region right and down"
(interactive "nRight: \nnDown: \nr")
(save-excursion
(defun context-FLOW-insert-cells (%optional n)
</pre>
== Metapost-mode and r-mode (from ESS, http://ess.r-project.org) in context-mode with mmm-mode ==
<pre>
;; Johan Sandblom. No copyright.
(require 'mmm-mode)
(setq mmm-global-mode 'maybe)
(setq mmm-submode-decoration-level 2)(mmm-add-group 'context-plus '((context-mpR :submode r-mode :face mmm-comment-submode-face :front ".*\\\\startR\\w*\\({\\w*}\\|\\[\\w*\\]\\|\\)\\W*" :back '(".*\\\\stopR") (context-MP :submode metapost-mode :face mmm-code-submode-face :front ".*\\\\start\\w*MP\\w*\\({\\w*}\\|\\[\\w*\\]\\|\\)\\W*" :back ".*\\\\stop\\w*MP") ))(add-to-list 'mmm-mode-ext-classes-alist '(context-mode nil context-mpplus))
</pre>
[[Category:Text Editors]]
