SiteMap Search ElispArea HowTo Glossary RecentChanges News Problems Suggestions

emdroid.el

Last major edit (later minor edits)

Summary: provide

Changed:

< What's Hitlers least favorite planet?
< 'Jewpiter'
-Ben
< Whats the difference between a jew and a pizza?
< The pizza doesnt scream when
you put it in an oven!
< Whats the difference between a Jew
and a Canoe?
< A canoe tips
< How do you get 100 jews into a car?
< Throw a quarter in
it.
< How do you get them out again?
< Tell them Hilter
is driving.
< How many jews can you fit in a VW Beetle?
< 54, two
in the front, two in the back, and fifty in the ashtray.
< How do you know you have a queer Jew?
< He likes money
more than girls.
< Have you heard about the Jewish sports car?
< It stops on
a dime, then picks it up
< What is a Jews biggest dilemma?
< Free pork
< Whey do Jews have such big noses?
< Cuz all
the airs free.
< Whats
the object of Jewish football?
< To
get the quarter back.
< How was copper wire invented
?
< 2 Jews fighting over the same penny
< What language does Jewish homo speak?
< Heblew
< What did the little German boy get
for his birthday?
< Easy bake oven
and a G.I Jew
< Hows Christmas celebrated in Jewish homes?
< They put parking meters on
the roof.
< Why did the Jews walk around the desert for 40 years?
< They heard that someone dropped
a quarter
< What do you call a room full
of jewish women with yeast infections?
< A whine
and cheese party.
< Whats Jewish doggy style?
< You beg for half an hour
and the princess rolls over and plays dead.
< What happens when a Jew
with an errection walks into a wall?
< He breaks his nose. - Mandy
< What's faster than a speeding bullet
?
< A jew with a coupon. - John
< Why did Hitler kill himself?
< He saw his gas bill
-Goose
< What
's the difference between a jew and Santa?
< Santa goes down
the chimney! -christoph
< A priest
and a rabbi were walking down the street,
< on
the other side they saw a young boy walking.
< The priest looked at the rabbi and said, "Let's screw him!", the rabbi replied, "Outta what?"

to

> ;;; emdroid.el --- Android Wrappers for Emacs
> ;; Copyright
- (cc) Some Rights Reserved 2007 Jonathan Arkell
> ;; Author: jonnay <jonnay@jonnay.net>
> ;; Keywords: java
> ;; This file is not part of GNU Emacs.
> ;; 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 version 2
.
> ;; 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.
> ;; For a copy of the GNU General Public License, search the Internet,
> ;; or write to
the Free Software Foundation, Inc., 59 Temple Place,
> ;; Suite 330, Boston, MA 02111-1307 USA
> ;;; Commentary:
> ;; Why should eclipse guys
get all the fun? Here are some commands for
> ;; working with android
> ;;; Install:
> ;; 1) add to your .emacs somehow.
> ;; 2) customize-group emdroid,
and set the Emdroid Tools Dir to
> ;; the location of the Adroid SDK Tools Directory.
> ;; 2a) optionally set the name of the emdroid activity creator
> ;; executeable
> ;;; Use:
> ;; emdroid-create-activity
> ;; Create
a new activity. Assumes the current directory.
> ;; emdroid-run
> ;; Execute
the emulator.
> ;; emdroid-install
> ;; Asks
for a file to install, and installs it on the emulator
> ;; emdroid-dmesg
> ;; Prints out the kernel dmesg
> ;; emdrpoid-info
> ;; Displays info
of the device
> ;;; Bugs:
> ;; - I think my defcustoms are bunk,
and the defaults have embedded quotes.
> ;;; Plan:
> ;; - Better usage
and install docco
> ;; - Minor mode with key bindings
> ;; - more (useful) wrappers around adb commands
> ;; - wrappers around
the ohter commands
> ;; - integration
with jde, especially the debugger
> ;; - maybe some kinda sql-sqlite integration as well
?
> ;; - dired hooks to copy files to and from the device easily?
> ;;; History:
> ;; * 0.1.1 - Added
a real emacs prelude
> ;; - Added command to start emulator
> ;; - Added adb wrapper, it kinda sucks but is at least functional
.
> ;; - Wrote some wrapper commands
> ;; * 0.1.0 - First Ever version on EmacsWiki.
> (defgroup emdroid nil
> "Customizations for the Emdroid Package."
> :version "0.1"
> :group 'emdroid)
> (defcustom emdroid
-tools-dir
> nil
> "Directory where the emdroid tools are. i.e /android_sdk_windows_m3-rc22a/tools/"
> :group 'emdroid
> :type 'directory)
> (defcustom emdroid-activity-creator
> "activityCreator.bat"
> "If you are on windows it is likely ActivityCreator.bat. If you are on Linux or OS X it is likely ActivityCreator.py."
> :group
'emdroid
> :type 'string)
> (defvar emdroid-emulator-process nil
> "Variable storing
the emulator process state.")
> (defvar emdroid-buffer nil
> "The output buffer for emdroids ADB.")
> (defun emdroid-create-activity (class-name)
> "Prompts for
a class name, and runs the create activity utility in the current directory."
> (interactive "sFully Qualified Class Name:")
> (shell
-command (concat emdroid-tools-dir "/" emdroid-activity-creator " " class-name) "*Create-Activity*"))
> (defun emdroid-emulator-live-p ()
> "Returns whether or not the emulator is live"
> (
and emdroid-emulator-process
> (eq (process-status emdroid-emulator-process)
> 'run)))
> (defun emdroid-run ()
> "Executes
the emulator"
> (interactive)
> (if (emdroid-emulator-live-p)
> (message "Emulator already running.")
> (progn
> (setq emdroid-emulator-process (start-process "em-droid-emulator" nil (concat emdroid-tools-dir "/emulator")))
> (message "Launching emulator."))))
> (defun emdroid-adb (command args)
> (if (not (buffer-live-p emdroid-buffer))
> (setq emdroid-buffer (get-buffer-create "*ADB*")))
> (pop-to-buffer emdroid-buffer nil)
> (end-of-buffer)
> (shell-command (concat emdroid-tools-dir "/adb " command " " args) 'true))
> (defun emdroid-install (file)
> "Installs an android APK"
> (interactive "fPackage To Install: ")
> (emdroid-adb "install" file))
> (defun emdroid-dmesg ()
> "Show
the linux dmesg"
> (interactive)
> (emdroid-adb "shell" "dmesg"))
> (defun emdroid-info ()
> "Show info about the device
. For now just the serial and device #"
> (interactive)
> (emdroid-adb
"get-product" "")
> (emdroid-adb "get-serialno
" ""))


Download

;;; emdroid.el --- Android Wrappers for Emacs

;; Copyright - (cc) Some Rights Reserved 2007 Jonathan Arkell
;; Author: jonnay <jonnay@jonnay.net>
;; Keywords: java

;; This file is not part of GNU Emacs.

;; 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 version 2.

;; 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.

;; For a copy of the GNU General Public License, search the Internet,
;; or write to the Free Software Foundation, Inc., 59 Temple Place,
;; Suite 330, Boston, MA 02111-1307 USA

;;; Commentary:
;; Why should eclipse guys get all the fun?  Here are some commands for
;; working with android

;;;  Install:
;; 1)  add to your .emacs somehow.
;; 2)  customize-group emdroid, and set the Emdroid Tools Dir to
;;     the location of the Adroid SDK Tools Directory.
;; 2a) optionally set the name of the emdroid activity creator
;;     executeable

;;; Use:
;; emdroid-create-activity
;;   Create a new activity.  Assumes the current directory.
;; emdroid-run
;;   Execute the emulator.
;; emdroid-install
;;   Asks for a file to install, and installs it on the emulator
;; emdroid-dmesg
;;   Prints out the kernel dmesg
;; emdrpoid-info
;;   Displays info of the device

;;; Bugs:
;; - I think my defcustoms are bunk, and the defaults have embedded quotes.

;;; Plan:
;; - Better usage and install docco
;; - Minor mode with key bindings
;; - more (useful) wrappers around adb commands
;; - wrappers around the ohter commands
;; - integration with jde, especially the debugger
;; - maybe some kinda sql-sqlite integration as well?
;; - dired hooks to copy files to and from the device easily?

;;; History:
;; * 0.1.1 - Added a real emacs prelude
;;         - Added command to start emulator
;;         - Added adb wrapper, it kinda sucks but is at least functional.
;;         - Wrote some wrapper commands
;; * 0.1.0 - First Ever version on EmacsWiki.  


(defgroup emdroid nil
  "Customizations for the Emdroid Package."
  :version "0.1"
  :group 'emdroid)

(defcustom emdroid-tools-dir
  nil
  "Directory where the emdroid tools are.  i.e  /android_sdk_windows_m3-rc22a/tools/"
  :group 'emdroid
  :type 'directory)

(defcustom emdroid-activity-creator
  "activityCreator.bat"
  "If you are on windows it is likely ActivityCreator.bat.  If you are on Linux or OS X it is likely ActivityCreator.py."
  :group 'emdroid
  :type 'string)

(defvar emdroid-emulator-process nil
  "Variable storing the emulator process state.")

(defvar emdroid-buffer nil
  "The output buffer for emdroids ADB.")

(defun emdroid-create-activity (class-name)
  "Prompts for a class name, and runs the create activity utility in the current directory."
  (interactive "sFully Qualified Class Name:")
  (shell-command (concat emdroid-tools-dir "/" emdroid-activity-creator " " class-name) "*Create-Activity*"))

(defun emdroid-emulator-live-p ()
  "Returns whether or not the emulator is live"
  (and emdroid-emulator-process
	   (eq (process-status emdroid-emulator-process)
		   'run)))

(defun emdroid-run ()
  "Executes the emulator"
  (interactive)
  (if (emdroid-emulator-live-p)
	  (message "Emulator already running.")
	  (progn
	   (setq emdroid-emulator-process (start-process "em-droid-emulator" nil (concat emdroid-tools-dir "/emulator")))
	   (message "Launching emulator."))))

(defun emdroid-adb (command args)
  (if (not (buffer-live-p emdroid-buffer))
	  (setq emdroid-buffer (get-buffer-create "*ADB*")))  
  (pop-to-buffer emdroid-buffer nil)
  (end-of-buffer)
  (shell-command (concat emdroid-tools-dir "/adb " command " " args) 'true))

(defun emdroid-install (file)
  "Installs an android APK"
  (interactive "fPackage To Install: ")
  (emdroid-adb "install" file))

(defun emdroid-dmesg ()
  "Show the linux dmesg"
  (interactive)
  (emdroid-adb "shell" "dmesg"))

(defun emdroid-info ()
  "Show info about the device.  For now just the serial and device #"
  (interactive)
  (emdroid-adb "get-product" "")
  (emdroid-adb "get-serialno" ""))

(provide 'emdroid)
;;; emdroid.el ends here