<commit_before>;;; prelude-mode.el --- Emacs Prelude: minor mode
;;
;; Copyright (c) 2011 <NAME>
;;
;; Author: <NAME> <<EMAIL>>
;; URL: http://www.emacswiki.org/cgi-bin/wiki/Prelude
;; Version: 1.0.0
;; Keywords: convenience

;; This file is not part of GNU Emacs.

;;; Commentary:

;; A minor mode defining a local keymap, plus a menu.

;;; License:

;; This program 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.
;;
;; This program 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; see the file COPYING.  If not, write to the
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.

;;; Code:

(defvar prelude-mode-map
  (let ((map (make-sparse-keymap)))
    (define-key map (kbd "C-c C-p o") 'prelude-open-with)
    (define-key map (kbd "C-c C-p g") 'prelude-google)
    ;; mimic popular IDEs binding, note that it doesn't work in a terminal session
    (define-key map [(shift return)] 'prelude-insert-empty-line)
    (define-key map [(control shift up)]  'prelude-move-line-up)
    (define-key map [(control shift down)]  'prelude-move-line-down)
    (define-key map (kbd "C-c C-p n") 'prelude-cleanup-buffer)
    (define-key map (kbd "C-c C-p f")  'prelude-recentf-ido-find-file)
    (define-key map (kbd "C-c C-p i") 'prelude-ido-goto-symbol)
    (define-key map (kbd "C-M-\\") 'prelude-indent-region-or-buffer)
    (define-key map (kbd "C-c C-p h") 'prelude-view-url)
    (define-key map (kbd "C-c C-p e") 'prelude-eval-and-replace)
    (define-key map (kbd "C-c C-p s") 'prelude-swap-windows)
    (define-key map (kbd "C-c C-p d") 'prelude-duplicate-current-line-or-region)
    (define-key map (kbd "C-c C-p r") 'prelude-rename-file-and-buffer)
    (define-key map (kbd "C-c C-p t") 'prelude-visit-term-buffer)
    (define-key map (kbd "C-c C-p k") 'prelude-kill-other-buffers)
    map)
  "Keymap for Prelude mode.")

(easy-menu-define prelude-mode-menu prelude-mode-map
  "Menu for Prelude mode"<commit_msg>fixed #79 - Prelude's keybindings are after all just user keybindings<commit_after>;;; prelude-mode.el --- Emacs Prelude: minor mode
;;
;; Copyright (c) 2011 <NAME>
;;
;; Author: <NAME> <<EMAIL>>
;; URL: http://www.emacswiki.org/cgi-bin/wiki/Prelude
;; Version: 1.0.0
;; Keywords: convenience

;; This file is not part of GNU Emacs.

;;; Commentary:

;; A minor mode defining a local keymap, plus a menu.

;;; License:

;; This program 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.
;;
;; This program 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; see the file COPYING.  If not, write to the
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.

;;; Code:

(defvar prelude-mode-map
  (let ((map (make-sparse-keymap)))
    (define-key map (kbd "C-c o") 'prelude-open-with)
    (define-key map (kbd "C-c g") 'prelude-google)
    ;; mimic popular IDEs binding, note that it doesn't work in a terminal session
    (define-key map [(shift return)] 'prelude-insert-empty-line)
    (define-key map [(control shift up)]  'prelude-move-line-up)
    (define-key map [(control shift down)]  'prelude-move-line-down)
    (define-key map (kbd "C-c n") 'prelude-cleanup-buffer)
    (define-key map (kbd "C-c f")  'prelude-recentf-ido-find-file)
    (define-key map (kbd "C-c i") 'prelude-ido-goto-symbol)
    (define-key map (kbd "C-M-\\") 'prelude-indent-region-or-buffer)
    (define-key map (kbd "C-c u") 'prelude-view-url)
    (define-key map (kbd "C-c e") 'prelude-eval-and-replace)
    (define-key map (kbd "C-c s") 'prelude-swap-windows)
    (define-key map (kbd "C-c d") 'prelude-duplicate-current-line-or-region)
    (define-key map (kbd "C-c r") 'prelude-rename-file-and-buffer)
    (define-key map (kbd "C-c t") 'prelude-visit-term-buffer)
    (define-key map (kbd "C-c k") 'prelude-kill-other-buffers)
    map)
  "Keymap for Prelude mode.")

(easy-menu-define prelude-mode-menu prelude-mode-map
  "Menu for Prelude mode"
{'fraction_non_alphanumeric': 0.14382716049382716, 'fraction_numerical': 0.00823045267489712, 'mean_word_length': 3.568609022556391, 'pattern_counts': {'":': 0, '<': 11, '<?xml version=': 0, '>': 11, 'https://': 0, 'lorem ipsum': 0, 'www.': 2, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '6476024', 'n_tokens_mistral': 1771, 'n_tokens_neox': 1722, 'n_words': 582}