mirror of
				https://github.com/KevinMidboe/linguist.git
				synced 2025-10-29 17:50:22 +00:00 
			
		
		
		
	Add .gnus, .viper and Project.ede as Emacs Lisp extensions
This commit is contained in:
		| @@ -1039,7 +1039,10 @@ Emacs Lisp: | ||||
|   filenames: | ||||
|   - ".emacs" | ||||
|   - ".emacs.desktop" | ||||
|   - ".gnus" | ||||
|   - ".spacemacs" | ||||
|   - ".viper" | ||||
|   - "Project.ede" | ||||
|   extensions: | ||||
|   - ".el" | ||||
|   - ".emacs" | ||||
|   | ||||
							
								
								
									
										20
									
								
								samples/Emacs Lisp/filenames/.gnus
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										20
									
								
								samples/Emacs Lisp/filenames/.gnus
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,20 @@ | ||||
| (setq user-full-name "Alhadis") | ||||
| (setq user-mail-address "fake.account@gmail.com") | ||||
|  | ||||
| (auto-image-file-mode) | ||||
| (setq mm-inline-large-images t) | ||||
| (add-to-list 'mm-attachment-override-types "image/*") | ||||
|  | ||||
| (setq gnus-select-method  | ||||
| 	  '(nnimap "gmail" | ||||
| 		(nnimap-address "imap.gmail.com") | ||||
| 		(nnimap-server-port 777) | ||||
| 		(nnimap-stream ssl))) | ||||
|  | ||||
| (setq message-send-mail-function 'smtpmail-send-it | ||||
| 	  smtpmail-starttls-credentials '(("smtp.gmail.com" 600 nil nil)) | ||||
| 	  smtpmail-auth-credentials '(("smtp.gmail.com" 700 "me@lisp.com" nil)) | ||||
| 	  smtpmail-default-smtp-server "smtp.gmail.com" | ||||
| 	  smtpmail-smtp-server "smtp.gmail.com" | ||||
| 	  smtpmail-smtp-service 800 | ||||
| 	  setq gnus-ignored-from-addresses "^from\\.Telstra[ \t\r\n]+Thanks") | ||||
							
								
								
									
										10
									
								
								samples/Emacs Lisp/filenames/.viper
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										10
									
								
								samples/Emacs Lisp/filenames/.viper
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,10 @@ | ||||
| (setq viper-inhibit-startup-message 't) | ||||
| (setq viper-expert-level '5) | ||||
|  | ||||
| ; Key bindings | ||||
| (define-key viper-vi-global-user-map "\C-d" 'end-of-line) | ||||
|  | ||||
| ; Return to top of window | ||||
| (defun my-viper-return-to-top () | ||||
|   (interactive) | ||||
|   (beginning-of-buffer)) | ||||
							
								
								
									
										34
									
								
								samples/Emacs Lisp/filenames/Project.ede
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										34
									
								
								samples/Emacs Lisp/filenames/Project.ede
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,34 @@ | ||||
| ;; Object EDE | ||||
| (ede-proj-project "Linguist" | ||||
|   :name "Linguist" | ||||
|   :version "4.9" | ||||
|   :file "Project.ede" | ||||
|   :targets (list  | ||||
|    (ede-proj-target-elisp-autoloads "autoloads" | ||||
|     :name "autoloads" | ||||
|     :path "test/samples/Emacs Lisp" | ||||
|     :autoload-file "dude.el" | ||||
|     ) | ||||
|    (ede-proj-target-elisp "init" | ||||
|     :name "init" | ||||
|     :path "" | ||||
|     :source '("ede-load.el" "wait-what.el") | ||||
|     :compiler 'ede-emacs-preload-compiler | ||||
|     :pre-load-packages '("sample-names") | ||||
|     ) | ||||
|    (ede-proj-target-elisp "what" | ||||
|     :name "the" | ||||
|     :path "" | ||||
|     :source '("h.el" "am-i-writing.el") | ||||
|     :versionsource '("hell.el") | ||||
|     :compiler 'ede-emacs-preload-compiler | ||||
|     :aux-packages '("what" "the" "hell-files" "am-i-writing") | ||||
|     ) | ||||
|    ) | ||||
|   :web-site-url "https://github.com/github/linguist" | ||||
|   :web-site-directory "../" | ||||
|   :web-site-file "CONTRIBUTING.md" | ||||
|   :ftp-upload-site "/ftp@git.hub.com:/madeup" | ||||
|   :configuration-variables 'nil | ||||
|   :metasubproject 't | ||||
|   ) | ||||
		Reference in New Issue
	
	Block a user