* added circe to package list (*potential* replacement for rcirc)
* added a handy function to retrieve passwords from the OS X keychain
This commit is contained in:
		
							parent
							
								
									73ba15b5a2
								
							
						
					
					
						commit
						25d348673b
					
				
					 2 changed files with 12 additions and 0 deletions
				
			
		| 
						 | 
					@ -35,6 +35,17 @@
 | 
				
			||||||
 | 
					
 | 
				
			||||||
    (load file)))
 | 
					    (load file)))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					(defun keychain-password (account &optional keychain)
 | 
				
			||||||
 | 
					  "Returns the password for the account, by default it's looked up in the Login.keychain but a
 | 
				
			||||||
 | 
					   different keychain can be specified."
 | 
				
			||||||
 | 
					  (let ((k (if keychain keychain "Login.keychain")))
 | 
				
			||||||
 | 
					    (replace-regexp-in-string
 | 
				
			||||||
 | 
					     "\n" ""
 | 
				
			||||||
 | 
					     (shell-command-to-string (concat  "security find-generic-password -w -a "
 | 
				
			||||||
 | 
					                                       account
 | 
				
			||||||
 | 
					                                       " "
 | 
				
			||||||
 | 
					                                       k)))))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
;; This clones a git repository to 'foldername in .emacs.d
 | 
					;; This clones a git repository to 'foldername in .emacs.d
 | 
				
			||||||
;; if there isn't already a folder with that name
 | 
					;; if there isn't already a folder with that name
 | 
				
			||||||
(defun custom-clone-git (url foldername)
 | 
					(defun custom-clone-git (url foldername)
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
							
								
								
									
										1
									
								
								init.el
									
										
									
									
									
								
							
							
						
						
									
										1
									
								
								init.el
									
										
									
									
									
								
							| 
						 | 
					@ -17,6 +17,7 @@
 | 
				
			||||||
  '(ac-nrepl
 | 
					  '(ac-nrepl
 | 
				
			||||||
    ace-jump-mode
 | 
					    ace-jump-mode
 | 
				
			||||||
    browse-kill-ring
 | 
					    browse-kill-ring
 | 
				
			||||||
 | 
					    circe
 | 
				
			||||||
    clojure-mode
 | 
					    clojure-mode
 | 
				
			||||||
    flycheck
 | 
					    flycheck
 | 
				
			||||||
    flx-ido
 | 
					    flx-ido
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue