Add EmacsKeys plugin.

A very simple non-intrusive plugin. Adds a bunch of actions typical emacs user
would expect. Doesn't contain any default key bindings.

Change-Id: Ib30fb46c577e2fdfd4c704e7f4eee7ee27a53c29
Reviewed-by: Christian Kandeler <christian.kandeler@digia.com>
Reviewed-by: hjk <hjk121@nokiamail.com>
Reviewed-by: Eike Ziller <eike.ziller@digia.com>
This commit is contained in:
nsf
2014-03-01 04:29:30 +06:00
committed by hjk
parent faca3333b5
commit 8560036d96
11 changed files with 795 additions and 0 deletions

View File

@@ -0,0 +1,86 @@
/**************************************************************************
**
** Copyright (c) nsf <no.smile.face@gmail.com>
** Contact: http://www.qt-project.org/legal
**
** This file is part of Qt Creator.
**
** Commercial License Usage
** Licensees holding valid commercial Qt licenses may use this file in
** accordance with the commercial license agreement provided with the
** Software or, alternatively, in accordance with the terms contained in
** a written agreement between you and Digia. For licensing terms and
** conditions see http://qt.digia.com/licensing. For further information
** use the contact form at http://qt.digia.com/contact-us.
**
** GNU Lesser General Public License Usage
** Alternatively, this file may be used under the terms of the GNU Lesser
** General Public License version 2.1 as published by the Free Software
** Foundation and appearing in the file LICENSE.LGPL included in the
** packaging of this file. Please review the following information to
** ensure the GNU Lesser General Public License version 2.1 requirements
** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
**
** In addition, as a special exception, Digia gives you certain additional
** rights. These rights are described in the Digia Qt LGPL Exception
** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
**
****************************************************************************/
#include "emacskeysstate.h"
#include <QTextCursor>
#include <QPlainTextEdit>
using namespace EmacsKeys::Internal;
//---------------------------------------------------------------------------
// EmacsKeysState
//---------------------------------------------------------------------------
EmacsKeysState::EmacsKeysState(QPlainTextEdit *edit):
m_ignore3rdParty(false),
m_mark(-1),
m_lastAction(KeysAction3rdParty),
m_editorWidget(edit)
{
connect(edit, SIGNAL(cursorPositionChanged()),
this, SLOT(cursorPositionChanged()));
connect(edit, SIGNAL(textChanged()),
this, SLOT(textChanged()));
connect(edit, SIGNAL(selectionChanged()),
this, SLOT(selectionChanged()));
}
EmacsKeysState::~EmacsKeysState() {}
void EmacsKeysState::setLastAction(EmacsKeysAction action)
{
if (m_mark != -1) {
// this code can be triggered only by 3rd party actions
beginOwnAction();
QTextCursor cursor = m_editorWidget->textCursor();
cursor.clearSelection();
m_editorWidget->setTextCursor(cursor);
m_mark = -1;
endOwnAction(action);
} else {
m_lastAction = action;
}
}
void EmacsKeysState::cursorPositionChanged() {
if (!m_ignore3rdParty)
setLastAction(KeysAction3rdParty);
}
void EmacsKeysState::textChanged() {
if (!m_ignore3rdParty)
setLastAction(KeysAction3rdParty);
}
void EmacsKeysState::selectionChanged()
{
if (!m_ignore3rdParty)
setLastAction(KeysAction3rdParty);
}