Browse Source

small fixes

pull/1/head
10sr 11 years ago
parent
commit
2bf14b5006
2 changed files with 34 additions and 21 deletions
  1. +9
    -5
      _keysnail.js
  2. +25
    -16
      emacs.el

+ 9
- 5
_keysnail.js View File

@@ -616,6 +616,7 @@ key.suspendKey = "Not defined";

// ================================= Hooks ================================= //


hook.setHook('KeyBoardQuit', function (aEvent) {
ext.exec("hide-sidebar");
let(elem = document.commandDispatcher.focusedElement) elem && elem.blur();
@@ -643,7 +644,6 @@ hook.setHook('Unload', function () {
});



// ============================= Key bindings ============================== //

key.setGlobalKey('C-<right>', function () {
@@ -682,6 +682,10 @@ key.setGlobalKey('<f11>', function (ev, arg) {
ext.exec("strong-fullscreen", arg, ev);
}, 'go fullscreen with hiding toolbar and tabbar', true);

key.setViewKey('0', function (ev) {
BrowserCloseTabOrWindow();
}, 'タブ / ウィンドウを閉じる');

key.setViewKey('N', function (ev) {
getBrowser().mTabContainer.advanceSelectedTab(1, true);
}, 'ひとつ右のタブへ');
@@ -822,10 +826,6 @@ key.setViewKey('B', function (ev) {
}
}, '選択中のタブを左へ');

key.setViewKey('0', function (ev) {
BrowserCloseTabOrWindow();
}, 'タブ / ウィンドウを閉じる');

key.setViewKey('C', function (ev, arg) {
ext.exec("linksnail", arg, ev);
}, 'LinkSnail', true);
@@ -918,3 +918,7 @@ key.setEditKey('C-p', function (ev) {
key.setEditKey('C-o', function (ev) {
command.openLine(ev);
}, '行を開く (Open line)');

key.setViewKey('f', function (ev, arg) {
ext.exec('strong-fullscreen', arg, ev);
}, 'go fullscreen with hiding toolbar and tabbar', true);

+ 25
- 16
emacs.el View File

@@ -68,6 +68,27 @@ otherwise the path where the library installed."
ok-if-already-exists)
path)))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; package

(when (require 'package nil t)
(add-to-list 'package-archives
'("ELPA" . "http://tromey.com/elpa/"))
(add-to-list 'package-archives
'("melpa" . "http://melpa.milkbox.net/packages/")
t)
(add-to-list 'package-archives
'("marmalade" . "http://marmalade-repo.org/packages/"))
;; (package-initialize)
;; (package-refresh-contents)
)

;; http://qiita.com/items/5f1cd86e2522fd3384a0
;; http://blog.64p.org/entry/2013/05/01/233306


;; (lazy-load-eval 'sudoku)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; autoload

@@ -313,6 +334,8 @@ found, otherwise returns nil."

;; (set-face-background 'vertical-border (face-foreground 'mode-line))

;; (set-window-margins (selected-window) 1 1)

(and (or (eq system-type 'Darwin)
(eq system-type 'darwin))
(fboundp 'mac-set-input-method-parameter)
@@ -640,24 +663,10 @@ found, otherwise returns nil."
(getenv "TMUX")
(pasteboard-enable-rtun))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; package

(when (require 'package nil t)
(add-to-list 'package-archives
'("melpa" . "http://melpa.milkbox.net/packages/")
t)
(add-to-list 'package-archives
'("marmalade" . "http://marmalade-repo.org/packages/"))
(add-to-list 'package-archives
'("ELPA" . "http://tromey.com/elpa/"))
(package-initialize))

(lazy-load-eval 'sudoku)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; https://github.com/lunaryorn/flycheck
(when (require 'flycheck nil t)
(add-hook 'after-init-hook #'global-flycheck-mode))
(add-hook 'after-init-hook 'global-flycheck-mode))

(defun my-install-packages ()
nil)


Loading…
Cancel
Save