Skip to content

Commit

Permalink
Convert files to LF from CRLF
Browse files Browse the repository at this point in the history
  • Loading branch information
regob committed Oct 6, 2024
1 parent 408d72f commit 260497b
Show file tree
Hide file tree
Showing 2 changed files with 78 additions and 78 deletions.
22 changes: 11 additions & 11 deletions lisp/init-powershell.el
Original file line number Diff line number Diff line change
@@ -1,11 +1,11 @@
;;; init-powershell.el --- summary -*- lexical-binding: t -*-
;;; Commentary:
;;; Code:

(use-package powershell
:ensure t
)

(provide 'init-powershell)

;;; init-powershell.el ends here
;;; init-powershell.el --- summary -*- lexical-binding: t -*-
;;; Commentary:
;;; Code:

(use-package powershell
:ensure t
)

(provide 'init-powershell)

;;; init-powershell.el ends here
134 changes: 67 additions & 67 deletions lisp/init-utils.el
Original file line number Diff line number Diff line change
@@ -1,67 +1,67 @@
;;; init-utils.el --- General utilities not belonging to elsewhere -*- lexical-binding: t -*-
;;; Commentary:
;;; Code:


(use-package calendar
:ensure nil
:init
;; show calendar week numbers
(copy-face font-lock-constant-face 'calendar-iso-week-face)
(set-face-attribute 'calendar-iso-week-face nil
:height 0.7)

(setq calendar-week-start-day 1
calendar-intermonth-text
'(propertize
(format "%2d"
(car
(calendar-iso-from-absolute
(calendar-absolute-from-gregorian (list month day year)))))
'font-lock-face 'calendar-iso-week-face))
)


(use-package writeroom-mode
:ensure (:source "MELPA")
:custom
(writeroom-width 120)
)

;; =========================
;; Misc user functions
;; =========================

(defun rb/jump-to-init-file ()
"Open init.el in the current window."
(interactive)
(find-file user-init-file)
)

(defun rb/byte-recompile ()
"Byte recompile all init files."
(interactive)
(byte-recompile-file user-init-file 0)
(byte-recompile-directory (expand-file-name "lisp" user-emacs-directory) 0)
)

(defun rb/search-google (query)
"Run google search for QUERY in the browser."
(interactive "sQuery: ")
(let* ((url (concat "https://google.com/search?q=" (url-hexify-string query))))
(browse-url-firefox url)
)
)

(define-prefix-command 'rb-user-keymap)
(global-set-key (kbd "C-c 8") 'rb-user-keymap)
(bind-key (kbd "i") 'rb/jump-to-init-file 'rb-user-keymap)
(bind-key (kbd "c") #'rb/byte-recompile 'rb-user-keymap)
(bind-key (kbd "u") #'browse-url-at-point 'rb-user-keymap)
(bind-key (kbd "g") #'rb/search-google 'rb-user-keymap)



(provide 'init-utils)

;;; init-utils.el ends here
;;; init-utils.el --- General utilities not belonging to elsewhere -*- lexical-binding: t -*-
;;; Commentary:
;;; Code:


(use-package calendar
:ensure nil
:init
;; show calendar week numbers
(copy-face font-lock-constant-face 'calendar-iso-week-face)
(set-face-attribute 'calendar-iso-week-face nil
:height 0.7)

(setq calendar-week-start-day 1
calendar-intermonth-text
'(propertize
(format "%2d"
(car
(calendar-iso-from-absolute
(calendar-absolute-from-gregorian (list month day year)))))
'font-lock-face 'calendar-iso-week-face))
)


(use-package writeroom-mode
:ensure (:source "MELPA")
:custom
(writeroom-width 120)
)

;; =========================
;; Misc user functions
;; =========================

(defun rb/jump-to-init-file ()
"Open init.el in the current window."
(interactive)
(find-file user-init-file)
)

(defun rb/byte-recompile ()
"Byte recompile all init files."
(interactive)
(byte-recompile-file user-init-file 0)
(byte-recompile-directory (expand-file-name "lisp" user-emacs-directory) 0)
)

(defun rb/search-google (query)
"Run google search for QUERY in the browser."
(interactive "sQuery: ")
(let* ((url (concat "https://google.com/search?q=" (url-hexify-string query))))
(browse-url-firefox url)
)
)

(define-prefix-command 'rb-user-keymap)
(global-set-key (kbd "C-c 8") 'rb-user-keymap)
(bind-key (kbd "i") 'rb/jump-to-init-file 'rb-user-keymap)
(bind-key (kbd "c") #'rb/byte-recompile 'rb-user-keymap)
(bind-key (kbd "u") #'browse-url-at-point 'rb-user-keymap)
(bind-key (kbd "g") #'rb/search-google 'rb-user-keymap)



(provide 'init-utils)

;;; init-utils.el ends here

0 comments on commit 260497b

Please sign in to comment.