Mercurial > emacs
view etc/srecode/getset-cpp.srt @ 107852:4abde609aac9
Add variable `scroll-preserve-screen-position-commands'.
http://lists.gnu.org/archive/html/emacs-devel/2010-04/msg00403.html
* window.c (Vscroll_preserve_screen_position_commands): New variable
with the default value as the list of Qscroll_down and Qscroll_up.
(window_scroll_pixel_based, window_scroll_line_based): Search the
last command in the list Vscroll_preserve_screen_position_commands
instead of comparing with Qscroll_up and Qscroll_down.
* mwheel.el (scroll-preserve-screen-position-commands):
Add mwheel-scroll to this list of commands.
* simple.el (scroll-preserve-screen-position-commands):
Add scroll-up-command, scroll-down-command, scroll-up-line,
scroll-down-line to this list of commands.
author | Juri Linkov <juri@jurta.org> |
---|---|
date | Wed, 14 Apr 2010 03:11:21 +0300 |
parents | 1d1d5d9bd884 |
children | 376148b31b5e |
line wrap: on
line source
;;; getset-cpp.srt --- SRecode templates for C++ class getter/setters. ;; Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. ;; Author: Eric M. Ludlam <eric@siege-engine.com> ;; This file is part of GNU Emacs. ;; GNU Emacs is free software: you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation, either version 3 of the License, or ;; (at your option) any later version. ;; GNU Emacs is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. set mode "c++-mode" set application "getset" context declaration template getset-in-class :tag :indent :blank ---- {{>A:classdecl:comment-function-group-start}} {{TYPE}} get{{NICENAME}}() const { return {{NAME}}; } void set{{NICENAME}}({{TYPE}} {{NICENAME}}) { {{NAME}} = {{NICENAME}}; } {{>A:classdecl:comment-function-group-end}} ---- template getset-field :blank :indent ---- {{?TYPE}} f{{?NAME}}; ---- template getset-initializer :indent ---- f{{NAME}}(){{#NOTLAST}},{{/NOTLAST}} ---- ;; end