ld/yasnippet
1
0
Fork 0
mirror of https://github.com/joaotavora/yasnippet.git synced 2025-12-12 00:14:18 +00:00
Code Issues Packages Projects Releases Wiki Activity

Rename symbol references from yas/* to yas-* in bundled snippets

Browse Source
This commit is contained in:
João Távora
2012-07-19 02:34:03 +01:00
parent e12a8bf188
commit 96638af80e
6 changed files with 1408 additions and 1361 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
extras/imported/objc-mode/.yas-setup.el
View File

@@ -1,19 +1,19 @@
(defun yas/objc-docset-query (query)
(defun yas-objc-docset-query (query)
)
(defvar yas/objc-method-names (make-vector 1023 0))
(defvar yas/objc-class-names (make-vector 1023 0))
(defvar yas-objc-method-names (make-vector 1023 0))
(defvar yas-objc-class-names (make-vector 1023 0))
(defvar yas/objc-languages (list))
(defvar yas/objc-defkinds (list))
(defvar yas-objc-languages (list))
(defvar yas-objc-defkinds (list))
(defun yas/objc-extract-super-list ()
(defun yas-objc-extract-super-list ()
(interactive)
(setq yas/objc-method-names (make-vector 1023 0)
yas/objc-class-names (make-vector 1023 0)
yas/objc-languages (list)
yas/objc-defkinds (list))
(setq yas-objc-method-names (make-vector 1023 0)
yas-objc-class-names (make-vector 1023 0)
yas-objc-languages (list)
yas-objc-defkinds (list))
(with-temp-buffer
(shell-command
"/Developer/usr/bin/docsetutil dump -skip-text /Developer/Documentation/DocSets/com.apple.adc.documentation.AppleSnowLeopard.CoreReference.docset/"
@@ -21,21 +21,21 @@
(goto-char (point-min))
(search-forward-regexp "API index contains .* tokens")
(while (search-forward-regexp "^\\([^/]*\\)/\\([^/]*\\)/\\([^/]*\\)/\\([^/]*\\)$" nil 'noerror)
(intern (match-string 3) yas/objc-class-names)
(intern (match-string 4) yas/objc-method-names)
(add-to-list 'yas/objc-languages (match-string 1))
(add-to-list 'yas/objc-defkinds (match-string 2)))))
(intern (match-string 3) yas-objc-class-names)
(intern (match-string 4) yas-objc-method-names)
(add-to-list 'yas-objc-languages (match-string 1))
(add-to-list 'yas-objc-defkinds (match-string 2)))))
;; (put (intern-soft (setq chosen (completing-read "Method: " yas/objc-method-names)) yas/objc-method-names)
;; (put (intern-soft (setq chosen (completing-read "Method: " yas-objc-method-names)) yas-objc-method-names)
;; 'someshit
;; 'someday)
;; (completing-read "Class: " yas/objc-class-names)
;; (completing-read "Class: " yas-objc-class-names)
;; (get (intern-soft (setq chosen (completing-read "hey: " yas/objc-method-names)) yas/objc-method-names)
;; (get (intern-soft (setq chosen (completing-read "hey: " yas-objc-method-names)) yas-objc-method-names)
;; 'someshit)
(defun yas/objc-current-method-signature ()
(defun yas-objc-current-method-signature ()
(let ((orig-point (point))
(start-point nil)
sig
@@ -58,7 +58,7 @@
(concat (or sig "") (match-string-no-properties 0)))))
sig))))
(defun yas/objc-current-method-signature ()
(defun yas-objc-current-method-signature ()
(let ((orig-point (point))
(start-point nil)
sig