.emacs-my
changeset 1024 4bb32327e98b
parent 1023 3a49cbe13ae3
child 1025 3d524b2cbbc1
equal deleted inserted replaced
1023:3a49cbe13ae3 1024:4bb32327e98b
  2316 (setq ropemacs-confirm-saving 'nil)
  2316 (setq ropemacs-confirm-saving 'nil)
  2317 
  2317 
  2318 (defun my-python-add-to-path (path)
  2318 (defun my-python-add-to-path (path)
  2319   (interactive (list (read-directory-name "Enter new path for PYTHONPATH: ")))
  2319   (interactive (list (read-directory-name "Enter new path for PYTHONPATH: ")))
  2320   (when (featurep 'cygwin-mount)
  2320   (when (featurep 'cygwin-mount)
  2321     (setq path (my-dos2cygwin-path path))
  2321     (setq path (my-dos2cygwin-path path)))
  2322     )
  2322   (python-send-string (format "import sys; sys.path.append(\"%s\")" (expand-file-name path))) )
  2323   (python-send-string (format "import sys; sys.path.append(\"%s\")" path))
       
  2324   )
       
  2325 
  2323 
  2326 (defun my-python-django-fix (path)
  2324 (defun my-python-django-fix (path)
  2327   "XXX not work on Cygwin + naive Emacs."
  2325   "XXX not work on Cygwin + naive Emacs."
  2328   (interactive (list (read-directory-name "Enter new path for PYTHONPATH: ")))
  2326   (interactive (list (read-directory-name "Enter new path for PYTHONPATH: ")))
  2329   (when (featurep 'cygwin-mount)
  2327   (when (featurep 'cygwin-mount)