Perguntas com a marcação «local-functions»

Gostaria de substituir temporariamente uma função em um pedaço de código. Tome, por exemplo, o seguinte: (defun nadvice/load-quiet (args) (cl-destructuring-bind (file &optional noerror nomessage nosuffix must-suffix) args (list file noerror t nosuffix must-suffix))) (defun nadvice/idle-require-quiet (old-fun &rest args) (advice-add 'load :filter-args #'nadvice/load-quiet) (apply old-fun args) (advice-remove #'load #'nadvice/load-quiet)) (advice-add 'idle-require-load-next …

14 advice  let-binding  local-functions 

O recurso de aconselhamento permite modificar o comportamento de uma função globalmente. Uma definição de conselho pode fazer chamadas para a função original. (defadvice foo (around foo-bar activate compile) "Always set `qux' to t when running `foo'." (let ((qux t)) ad-do-it)) O clpacote fornece a fletmacro para substituir uma função …

7 functions  advice  let-binding  local-functions